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内 容 简 介 


Dreamweaver 8 是 Macromedia Studio 8 Web 开发 套件 的 一 个 重要 组 成 部 分 ， 它 在 原 有 版 本 的 基础 上 ， 
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问 、 动 态 网 站 各 个 版 块 的 制作 过 程 等 。 
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ASPNET 是 微软 最 新 推出 的 新 一 代 Web 开发 技术 ， 它 也 是 微软 所 推出 的 新 型 体系 结 
构 .NET 的 一 个 重要 组 成 部 分 。 在 针对 ASPNET 的 开发 工具 中 , Dreamweaver 8 的 出 现 无 疑 
使 之 成 为 ASPNET 开发 人 员 的 最 佳 选择 。 

Dreamweaver 8 是 Macromedia 公司 推出 的 一 个 专业 可 视 化 的 HTML 编辑 工具 , 用 于 对 
Web 站 点 、Web 页 面 和 Web 应 用 程序 进行 设计 、 编 码 和 开发 。Dreamweaver 8 也 是 
Macromedia 公司 所 推出 的 Macromedia Studio 8 Web 开发 套件 的 一 个 重要 组 成 部 分 。 
Dreamweaver 8 在 原 有 版 本 的 基础 上 ， 新 增 了 许多 激动 人 心 的 新 功能 ， 进 一 步 改善 了 
Dreamweaver 的 易 用 性 和 扩展 性 ， 使 用 户 无 论处 于 设计 环境 还 是 编码 环境 都 可 以 方便 、 快 
捷 地 创建 Web 页 面 。 

本 书 从 Dreamweaver 8、ASP.NET 的 基础 知识 入 手 ， 结 合 基本 的 开发 知识 、 技 巧 和 典 
型 的 开发 实例 , 循序 渐进 地 介绍 了 Dreamweaver 8 和 ASPNET 环境 下 各 种 动态 网 站 模块 的 
开发 。 本 书 共 分 11 章 ， 内 容 涉 及 Dreamweaver 8 的 使 用 、ASPNET 语法 基础 、Web 表单 
和 控件 、 验 证 控件 、ADO.NET 数据 访问 、 模 板 控件 等 ， 各 章 内 容 介 绍 如 下 。 

第 1 章 ，Dreamweaver 8 基础 知识 : 介绍 Dreamweaver 8 基础 知识 ， 包 括 Dreamweaver 8 
中 的 新 增 功 能 、 软 件 安装 及 常用 的 操作 界面 。 

第 2 章 站 点 操纵 ; 介绍 在 Dreamweaver 8 中 对 站 点 的 相关 操作 ， 包 括 新 建站 点 、 管 
理 站 点 及 一 些 高 级 操作 等 。 

第 3 章 Dreamweaver 8 的 基本 操作 : 介绍 在 Dreamweaver 8 中 如 何 操作 相关 的 基本 
元 素 ， 包 括 文本 、 图 像 、 链 接 以 及 表格 等 。 

第 4 章 数据 库 的 操作 : 介绍 Access 数据 库 的 基本 操作 。 

第 5 章 VB.NET 语言 基础 及 ASP.NET 网 页 基本 结构 : 介绍 VB.NET 语言 基本 语法 
以 及 ASP.NET 页 面 基本 结构 , 包括 ASPNET 页 面 中 的 代码 块 、 表 单 和 常用 的 服务 器 控件 。 

第 6 章 ADO.NET 与 数据 库 的 访问 : 讲解 如 何在 ASPNET 中 使 用 ADO.NET 进行 数 
据 访问 ， 并 通过 实例 介绍 DataGrid、DataList 和 Repeater 等 常用 数据 控件 的 使 用 。 

第 7 章 ”留言 短 制 作 ; 介绍 如 何在 Dreamweaver 8 中 设计 制作 基于 ASPNET 的 留言 秒 。 

第 8 章 会 员 管理 ;介绍 如 何 实现 网 站 中 常用 的 基于 ASP.NET 的 会 员 管理 系统 。 

第 9 章 ， 网络 相 册 : 介 绍 如 何在 Dreamweaver 8 中 设计 制作 基于 ASPNET 的 网 络 相册 。 

第 10 章 同学 录 : 介绍 如 何在 Dreamweaver 8 中 设计 制作 基于 ASPNET 的 同学 录 。 

第 11 章 动态 新 闻 发 布 系统 ， 介绍 如 何在 Dreamweaver 8 中 设计 制作 基于 ASPNET 
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的 动态 新 闻 发 布 系统 。 

本 书 重 在 结合 作者 的 开发 经 验 ， 充 分 考虑 到 读者 在 学 习 和 应 用 开发 过 程 中 容易 出 现 的 
错误 ， 避 免 读者 在 学 习 过 程 中 走 弯 路 。 全 书 语言 简洁 ， 实 例 丰 富 ， 介 绍 的 技术 先进 ， 知 识 
面 广 ， 实 例 典型 ， 十 分 适合 即将 走向 工作 岗位 的 各 级 各 类 学 校 的 学 生 使 用 。 

本 书 由 彭 为 、 陶 利 、 陈 晓 明 、 王 鹏 、 李 水 、 胡 勇 辉 、 杭 志 、 兰 湘 涛 、 胡 容 、 杭 志 、 文 
龙 等 编写 。 因 时 间 人 仓促， 水平 有 限 ， 尚 有 许多 不 是 和 不 准确 之 处 ， 奶 请 广大 读者 提出 批评 
和 建议 ， 也 欢迎 广大 读者 到 www.54pub.com < http://www.54pub.com> 来 进行 广泛 的 交流 与 
探讨 。 
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第 1 章 Dreamweaver 8 基础 知识 


Dreamweaver 是 Macromedia 公司 (已 被 ADOBE 公司 收购 ) 推 出 的 一 个 专业 可 视 化 的 
HTML 编辑 工具 ， 用 于 对 Web 站 点 、Web 页 和 Web 应 用 程序 进行 设计 、 编 码 和 开发 。 
Dreamweaver 的 功能 强大 且 界 面 友好 ， 使 用 它 可 制作 跨 平台 浏览 的 网 页 。Dreamweaver 所 
提供 的 可 视 化 编辑 功能 ， 可 帮助 用 户 快速 创建 不 需要 手工 编写 任何 代码 的 动态 页 面 。 此 外 ， 
Dreamweaver 还 提供 了 功能 全 面 的 编码 环境 ， 其 中 包括 代码 编辑 工具 ， 以 及 有 关 层 合 样 式 
表 (CSS)、JavaScript 和 CodeFusion 标记 语言 (CFML) 等 方面 的 参考 资料 。 

本 章 将 介绍 Dreamweaver 8 的 基础 知识 ， 以 及 如 何 安装 Dreamweaver 8， 让 读者 对 
Dreamweaver 8 有 一 个 基本 的 认识 。 


1.1 Dreamweaver 8 的 新 增 功 能 


Dreamweaver 8 是 Macromedia 公司 推出 的 Macromedia Studio 8 Web 开发 套件 的 一 个 重 
要 组 成 部 分 。Dreamweaver 8 在 原 有 版 本 的 基础 上 ，, 新 增 了 许多 激动 人 心 的 新 功能 ， 进 一 步 
改善 了 Dreamweaver 的 易 用 性 和 扩展 性 ， 使 用 户 无 论处 于 哪个 开发 环境 ( 即 是 在 设计 环境 
还 是 编码 环境 )， 都 可 以 方便 地 创建 页 面 。 下 面 ， 就 来 认识 一 下 Dreamweaver 8 的 新 增 功能 
或 增强 功能 。 

1. 改进 的 工作 环境 


Dreamweaver 8 在 工作 环境 方面 的 改进 主要 体现 在 工作 区 布局 的 改进 、 代 码 折 车 的 实现 
以 及 新 增 的 编码 工具 栏 和 样式 呈现 工具 栏 。 

1) 工作 区 布局 

Dreamweaver 8 提供 了 两 种 工作 区 布局 样式 : 设计 器 和 编码 器 。 

设计 器 是 一 个 使 用 MDI( 多 文档 界面 ) 的 集成 工作 区 ， 其 中 全 部 文档 窗口 和 面板 被 集成 
在 一 个 较 大 的 应 用 程序 窗口 中 ， 同 时 面板 组 停靠 在 右 侧 ， 如 图 1.1 所 示 。 

编码 器 同样 是 一 个 集成 的 工作 区 ， 但 其 面板 组 停靠 在 左 侧 ， 且 文档 窗口 在 默认 情况 下 
显示 为 【代码 】 视 图 ， 如 图 1.2 所 示 。 

首次 启动 Dreamweaver 8 时 ， 系 统 将 会 弹出 一 个 对 话 框 让 用 户 选 择 一 种 默认 的 工作 区 
布局 。 而 在 以 后 的 操作 中 ， 用 户 可 随时 切换 工作 区 。 

除了 以 上 两 种 工作 区 布局 样式 外 ， 用 户 还 可 以 根据 自己 的 需要 自 定 义工 作 区 的 布局 样 
式 , 将 其 保存 后 ，Dreamweaver 8 将 记 住 指定 布局 中 的 面板 以 及 其 他 属性 ， 如 面板 的 位 置 和 
大 小 、 面 板 的 展开 或 折 炙 状态 以 及 应 用 程序 窗口 的 位 置 和 大 小 等 。 
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1.1 工作 区 布局 样式 一 一 设计 器 


TE\Book\ASP.NET( 四 儿 book\example\ 同 学 录 \Man.aspx (XHTML 


文件 旧 编 扣 (四 查理 拍 和 (D 修 台 (MM) 文本 (D 命令 站点 (5) 窗口 (WD 玫 入 内 
bd 六 回电 | 国 瑟 国 - 安装 入 四 | 回 " 多 


[Eps mn | 
名 C18 人 个 必 色 | 书 


4 Systen. Configurstion.ConfigurationSettings. App5ettings( 
“]OLOONIECTION_STRINS_Cnnr ) %> 

DatabaseType=” (Wa Systen. Corf1¢uratior. Contigurationsettings. AppSettings ( 

“I COMIECTION_DATADASETYPE_Cra” 

CommandToxt-'<W4 “SELECT » FROX UsorShoor WHERE code = 7 %>" 

Debue="true” 

DParaneters) 

《Paraneter Nane="@Code” Yalus=" ¢%# IIf( (Kot Request,Cookies ("id’) Is Nothing), Reauest,Ceokies(IIf (( 
Not Request, Cookies("i¢”) Is Nothing), “id”, 0)). Value, ““) %>’ Type="Integer” /YC/Paraneters>d/ 
Of 


DatabaseType=" CW# Systen. C Er ConfigarationSettings.AppSettings( 
“I COMIECTION_DATABASETYPE_Cra” ) % 
commandTert she’ “SELECT -FROM lassino WEEKE id in (select classcode fron usorslass where 


ET 


Debug="true” 
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{Paraneters) VieFhote am 是 
Paraneter Nane="@Userld” Yalue=" CW# TIf( (Not Request.Coogies( "Ter) Is Nothing), Request.Cookies Sek a 
{IIf ((Not Request.Cookies("1d") 1s Nothing), “Id’, 0)). Yalue, ™) %>" Type="BigInt” /> pt 
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1.2 工作 区 布局 样式 一 一 编码 器 


2) ”代码 折 靶 

Dreamweaver 8 提供 了 代码 折 秋 的 功能 , 即将 指定 的 开始 标签 和 结束 标签 之 间 的 代码 块 
或 用 户 所 选 定 的 代码 块 折 双 起来， 达到 隐藏 的 目的 ， 以 便 重点 显示 用 户 所 要 查看 的 代码 。 
被 折 释 的 代码 片断 仅 显 示 隐 藏 的 第 一 行 的 每 一 个 单词 和 省 略 号 (...)， 同 时 背景 为 灰色 ， 带 
圆 角 和 矩形 框 ， 如 图 1.3 所 示 。 

从 以 上 折 县 代码 所 在 的 行 数 (第 101 行 ) 和 下 一 行 代码 所 显示 的 行 数 (第 171 行 ) 可 以 看 出 ， 


2 。 
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所 隐藏 的 代码 片断 包括 70 行 (从 101 行 到 170 行 ) 代 码 。 当 将 鼠标 放 在 折 又 代码 片断 的 上 时 ， 
可 查看 折合 代码 片断 中 的 代码 而 不 需 扩展 该 代码 片断 ， 双 击 折 倒 代码 片断 ， 可 展开 显示 代 
码 片断 中 的 所 有 代码 。 


<title) 中 国 同学 录 C/title> 


Kscript 


折合 的 代码 片段 


图 1.3 代码 折 垒 
3) 【编码 】 工 具 栏 
Dreamweaver 8 提供 了 一 个 新 的 工具 栏 【编码 】 工 具 栏 ， 这 是 Dreamweaver 8 以 前 
的 版 本 中 所 没有 的 。【 编 码 】 工 具 栏 一 般 停靠 在 【代码 】 视 图 的 左 侧 ， 它 提供 了 用 于 常见 
编码 功能 的 相关 按钮 ， 如 图 1.4 所 示 。 


加 一 打开 文档 : 便于 用 户 选择 已 打开 的 文档 
二 折 查 整个 标签 : 用 于 折 委 位 于 一 组 开始 和 结束 标签 之 间 的 内 容 ,此 时 插入 点 应 放置 在 开始 或 结束 
0 标 等 中 


若 一 折 查 所 选 : 用 于 折 得 所 选择 的 代码 
药 一 扩展 全 部 : 用 于 展开 或 还 原 所 有 折 得 的 代码 


以 一 选择 父 标 答 : 用 于 选择 当前 插入 点 所 在 的 那 一 行内 容 及 其 两 侧 的 开始 和 结束 标签 

{一 选 职 当 首 代 码 段 : 用 于 选择 当前 插入 点 所 在 的 那 一 行内 容 及 其 两 侧 的 圆 括号 、 大 括 弧 或 方 括号 
机 一 行 8 ; 用 于 控制 在 每 个 代码 行 的 行 首 显示 或 隐 燕 行 的 号 码 

全 一 高 亮 显示 无 效 代码 : 用 于 以 黄色 高 亮 显示 无 效 的 代码 

癌 一 启用 注释 :用 于 在 所 选择 的 代码 两 侧 添加 注释 标签 或 打开 新 的 注释 标签 

[7 一 圳 BS 注释 : 用 于 册 除 所 代码 的 注释 标签 。 如 果 所 选 内 容 包 含 赔 套 注释 ， 则 公 册 除外 部 注释 标签 


六 一 环境 标签 :用 于 在 所 选择 的 代码 两 侧 添加 从 “快速 标签 编辑 器 ”中 所 选择 的 标签 
由 一 最 近 的 代码 片段 : 用 于 从 “代码 片断 ”面板 中 插入 最 近 使 用 过 的 代码 片断 


一 缩 进 代 码 : 将 所 选择 的 内 容 向 右 移动 
一 中 出 代码 : 格 所 沈 择 的 内 容 向 左 移 翅 


已 一 格式 化 源 代码 :用 于 将 先前 所 指定 的 代码 格式 应 用 于 当前 所 选择 的 代码 ; 如 果 未 选择 代码 块 ， 则 
ES 应 用 于 当前 整个 页 面 


图 1.4 【编码 】 工 具 栏 


4) 【样式 呈现 】 工 具 栏 

【样式 呈现 】 工 具 栏 是 Dreamweaver 8 提供 的 一 个 新 特性 ， 它 为 用 户 提供 了 一 个 快捷 
的 方式 来 为 不 同 的 媒体 类 型 ， 如 屏幕 、 手 持 设备 和 打印 输出 等 进行 设计 。 如 图 1.5 所 示 ， 
【样式 呈现 】 工 具 栏 中 包含 了 一 些 按钮 ， 这 些 按钮 能 够 查看 设计 在 不 同 媒体 类 型 中 的 呈现 
方式 。 


样式 呈现 EE 


j 届 | 旬 | 罩 | 加 | 画 | 首 |G| 


屏 站 媒体 打印 媒体 手持 型 媒体 投影 媒体 TTY 球 体 TY 媒体 切换 C535 样式 的 显示 
1.5 【样式 呈现 】 工 具 栏 
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屏幕 媒体 ”用 于 显示 页 面 在 计算 机 屏幕 上 的 显示 方式 。 

打印 媒体 用 于 显示 页 面 在 打印 纸张 上 的 显示 方式 。 
手持 型 媒体 ”用 于 显示 页 面 在 手持 设备 (如 手机 ) 上 的 显示 方式 。 
投影 媒体 ”用 于 显示 页 面 在 投影 设备 上 的 显示 方式 。 

TTY 媒体 用 于 显示 页 面 在 电 传 打字 机 上 的 显示 方式 。 

TV 媒体 用 于 显示 页 面 在 电视 屏幕 上 的 显示 方式 。 

切换 CSS 样式 显示 “用 于 控制 是 否 启用 CSS 样式 。 


提示 : 只 有 当 文 档 使 用 了 依赖 于 媒体 的 样式 表 时 ，【 样 式 呈 现 】〗 工 具 栏 才 有 用 。 所 谓 依 赖 
于 媒体 的 样式 表 ， 是 指 通过 样式 表 为 相应 的 媒体 类 型 指定 某 种 正文 规则 。 


通过 【样式 呈现 】 工 具 栏 ， 只 需 创建 相应 的 CSS 文件 并 将 其 应 用 到 页 面 样式 ， 然 后 将 
其 和 相应 的 媒体 类 型 匹配 ， 即 可 快速 完成 针对 不 同 媒体 类 型 的 设计 工作 。 


2. 新 增 的 设计 工具 


在 设计 工具 方面 ，Dreamweaver 8 新 增 了 【缩放 】 工 具 、 辅 助 线 、【 插 入 Flash 视频 】 
对 话 框 等 。 

1) 【缩放 】 工 具 

Dreamweaver 8 可 以 通过 【缩放 】 工 具 放 大 或 缩小 当前 文档 ， 以 便 更 容易 地 查看 图 形 的 
像素 精确 度 、 对 齐 图 像 、 选 择 较 小 的 图 像 以 及 查看 较 小 的 文本 等 。 

【缩放 】 工 具 一 般 显示 在 文档 窗口 的 右 下 角 , 它 包 括 一 个 放大 
镜 图 标 和 一 个 用 于 设置 缩放 比率 的 文本 框 ， 如 图 1.6 所 示 。 

在 用 于 设置 缩放 比率 的 文本 框 中 , 除 提供 了 可 以 设置 缩放 的 比 。 图 16 【缩放 】 工 具 
率 ， 还 提供 了 【符合 所 选 】、【 符 合 全 部 】 和 【符合 宽度 】3 个 选项 。 其 中 ，【 符 合 所 选 】 
选项 可 使 所 选择 的 内 容 填充 文档 窗口 ; 【符合 全 部 】 选 项 可 使 整个 页 面 填充 文档 窗口 ;【 符 
合 宽度 】 选 项 可 使 页 面 的 整个 宽度 填充 文档 窗口 。 


提示 : 【缩放 】 工 具 仅 在 【设计 】 视 图 中 可 用 .。 


2) ”辅助 线 

辅助 线 是 拖 动 标尺 到 文档 上 时 所 产生 的 线条 ， 它 有 助 于 用 户 更 加 准确 地 放置 和 对 齐 文 
档 上 的 各 种 对 象 ， 同 时 也 可 被 用 来 获取 页 面 元 素 的 大 小 。 在 图 1.7 中 的 虚线 即 为 
Dreamweaver 8 提供 的 辅助 线 。 

辅助 线 包括 水 平 辅助 线 和 垂直 辅助 线 两 种 ， 其 创建 方法 很 简单 ， 只 需 从 相应 的 标尺 用 
鼠标 进行 拖 动 即 可 。 对 于 已 经 创建 的 辅助 线 ， 可 通过 再 次 拖 动 来 进行 重新 定位 。 如 果 需 要 
查看 辅助 线 分 割 出 来 的 方 格 的 高 度 和 宽度 ， 可 将 鼠标 移 至 该 方 格 中 ,， 按 下 Ctrl 键 。 在 图 1.7 
中 ， 两 个 方块 中 显示 的 即 为 该 方 格 的 高 度 和 宽度 。 

此 外 ， 可 对 辅助 线 进行 相应 的 操作 和 设置 ， 如 锁定 辅助 线 、 将 辅助 线 靠 齐 元 素 、 将 元 
素 靠 齐 辅助 线 、 改 变 辅助 线 的 颜色 等 。 还 可 通过 专门 的 菜单 命令 对 辅助 线 进 行 操作 ， 如 
图 1.8 所 示 。 

3) 【插入 Flash 视频 】 对 话 框 

Dreamweaver 8 提供 了 直接 在 页 面 中 插入 Flash 视频 文件 的 功能 ， 即 通过 如 图 1.9 所 示 
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的 【插入 Flash 视频 】 对 话 框 来 快捷 地 插入 Flash 视频 。 


et J ECAEEIE SN 92 EE 
攻 可 必 直 二 EEC ET 
有 pl, ET 汉 天 
四 
En 3 
量 
站 
司 
[ea rE 
图 1.7 辅助 线 
Me RT 可 
取消 
ER 浏览 ， 帮助 
【 镁 入 Flash 视频 文件 的 相对 或 绝对 路 径 ) 
sa! RE 10) El 
> | 
限制 并 比 。 机 大 小 | 
高 度 : 包括 外 观 : 
厂 自动 播放 
厂 自动 重新 播放 
| 加 果 必 要 ， 提 示 用 尸 下载 Flash Player 
nn) 要 观看 视频 ， 请 在 浏览 器 中 预览 页 面 - 
图 1.8 辅助 线 菜单 图 1.9 【插入 Flash 视频 】 对 话 框 


在 【视频 类 型 】 下 拉 列 表 框 中 ， 包 括 【 累 进 式 下 载 视频 】 和 【 流 视频 】 两 个 选项 。 其 
中 ， 累 进 式 下 载 视频 (Progressive Download Video) 是 将 Flash 视频 文件 下 载 到 站 点 访问 者 的 
硬盘 上 再 进行 播放 ;而 流 视频 (Streaming Video) 则 是 将 Flash 视频 文件 进行 流 处 理 并 立即 在 
Web 页 面 中 进行 播放 。 

在 【外 观 】 下 拉 列 表 框 中 ， 提 供 了 包含 Flash 视频 内 容 的 Flash 视频 组 件 的 外 观 选项 。 

通过 【宽度 】 和 【高 度 】 两 个 文本 框 ， 可 设置 以 像素 为 单位 的 Flash 视频 文件 的 显示 
宽度 和 高 度 。 

在 Web 页 面 中 插入 Flash 视频 文件 后 ， 可 以 通过 【属性 】 面 板 继续 修改 视频 文件 的 相 
关 属 性 ， 如 图 1.10 所 示 。 
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mLas 视频 | 宽 40 | 限制 高 帘 比 ”于 置 | 文件 fe tomnsendpoe av 加 类 四 [无 "le 
Feisyer | 高 hz0 ”包括 外 观 : 140x120 外 观 [clear skin ! (最 小 宽度 : 140) 可 
厂 自动 播放 
厂 自动 重新 播放 ds 


1.10 ”用 来 设置 Flash 视频 文件 属性 的 【属性 】 面 板 
3. 扩展 的 CSS 功能 


Dreamweaver MX 2004 已 经 具备 了 功能 强大 的 CSS 功能 。 在 此 基础 上 , Dreamweaver 8 
又 提供 了 更 强 的 支持 。 


4. 统一 的 CSS 面板 


Dreamweaver 8 对 CSS 面板 进行 了 重新 设计 ， 将 Dreamweaver MX 2004 中 的 多 个 CSS 
面板 集成 到 了 一 个 统一 的 面板 中 ， 如 图 1.11 所 示 。 

在 【全 部 】 模 式 下 ， 可 以 查看 和 设置 当前 页 面 中 的 所 有 CSS 样式 ; 在 【正在 】 模 式 下 ， 
可 以 查看 和 设置 当前 所 选择 的 页 面 元 素 的 CSS 样式 。 

在 CSS 面板 中 提供 了 3 种 视图 : 【类 别 】 视 图 考 、【 列 表 】 视 图 如 4 和 【设置 属性 】 
视图 糙 上 。 其 中 ，【 类 别 】 视 图 将 Dreamweaver 所 支持 的 CSS 属性 划分 为 9 个 类 别 : 字体 、 
背景 、 区 块 、 边 框 、 方 框 、 列 表 、 定 位 、 扩 展 和 表 ， 用户 可 通过 该 视图 查看 相应 类 别 的 CSS 
属性 ; 【列表 】 视 图 则 按 字母 顺序 显示 Dreamweaver 所 支持 的 所 有 CSS 属性 ; 【设置 属性 】 
视图 则 仅 用 来 显示 那些 已 经 设置 的 CSS 属性 。 

此 外 ， 在 CSS 面板 的 右 下 角 还 提供 了 4 个 操作 按钮 ， 痢 |( 附 加 样式 表 )、 世 (新 建 CSS 
规则 )、 国 (编辑 样式 ) 和 带 ( 删 除 CSS 规则 )。 

事实 上 ，CSS 面板 已 经 变 成 了 一 个 更 具有 可 操作 性 的 控制 面板 ， 通 过 它 可 以 快捷 地 确 
认 样 式 、 编 辑 样 式 和 查看 应 用 于 页 面 元 素 的 样式 。 


5. CSS 布局 的 可 视 化 


在 Dreamweaver 8 中 , 当 工 作 窗口 为 【设计 】 视 图 时 ， 允 许 显示 CSS 布局 块 。 所 谓 CSS 
布局 块 ， 是 一 个 HTML 页 面 元 素 ， 它 可 以 定位 在 页 面 中 的 任何 位 置 。 更 确切 地 说 ，CSS 布 
局 块 是 display 属性 的 属性 值 不 为 inline 的 div 标签 ， 或 者 是 包括 display:block 、 
position:absolute 或 position:relative 等 CSS 声明 的 任何 其 他 页 面 元 素 。 

出 于 可 视 化 呈现 的 目的 ，CSS 布局 块 不 包含 内 联 元 素 ( 即 代 码 为 一 行 的 元 素 ) 或 段落 之 
类 的 简单 块 元 素 。 

Dreamweaver 8 提供 了 多 个 命令 帮助 用 户 查看 CSS 布局 块 ， 如 图 1.12 所 示 。 

【CSS 布局 背景 】 命 令 可 显示 各 个 CSS 布局 块 的 临时 指定 背景 颜色 ， 并 隐藏 通常 出 现 
在 页 面 上 的 所 有 背景 颜色 或 图 片 , 【CSS 布局 框 模型 】 命 令 可 显示 所 选择 的 CSS 布局 块 的 
框 模 型 ( 即 填充 和 边界 ); 【CSS 布局 外 框 】 命 令 则 可 显示 页 面 上 所 有 CSS 布局 块 的 外 框 。 
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background-color D “#FFAFC” C55 布局 外 框 (0) 
eol 国 _#oo0000 
宋体 * 


图 1.11 CSS 面板 图 1.12 ”用 于 查看 CSS 布局 块 的 命令 


6. 支持 XML/XSLT 数据 的 创建 


Dreamweaver 8 新 增 的 XML/XSLT 创建 功能 简化 了 用 于 Web 浏览 的 XML 文件 的 格式 
化 过 程 。 用 户 可 以 创建 XSLT 文件 ， 并 完全 可 以 使 用 CSS 格式 ， 将 其 转换 成 难于 理解 的 
XML 文件 ， 并 放 入 网 页 中 。 

Dreamweaver 8 还 提供 了 简捷 的 方法 帮助 用 户 快速 格式 化 一 个 XML 文件 ， 以 便 直 接 在 
浏览 器 中 进行 浏览 。 同时, 也 可 使 用 Dreamweaver 中 的 动态 页 面 开 发 工具 , 利用 ASP、PHP、 
ASPNET 等 Dreamweaver 8 所 支持 的 动态 页 面 开发 技术 ,将 XML 文件 转换 为 任何 Web 浏 
览 器 都 支持 的 HTML 文件 。 

7. 对 文件 的 处 理 

1) ”文件 差异 的 比较 

Dreamweaver 8 提供 了 一 种 文件 比较 工具 ( 即 Diff 工具 )。 使 用 该 工具 可 以 比较 同一 文件 
的 本 地 版 本 和 远程 版 本 的 代码 、 两 个 不 同 的 远 端 文件 的 代码 或 两 个 不 同 的 本 地 文件 的 代码 。 
这 为 比较 两 个 文件 的 差异 、 进 行文 件 的 版 本 控制 提供 了 极 大 的 便利 。 


提示 : 文件 比较 工具 不 是 Dreamweaver 8 自 带 的 ， 使 用 前 必须 进行 下 载 和 安装 。 同 时 ， 还 
必须 在 Dreamweaver 8 中 指定 该 工具 。 


2) “文件 的 后 台 传 输 功能 

在 Dreamweaver 8 以 前 的 版 本 中 ， 当 向 Web 服务 器 进行 文件 传输 时 ， 用 户 必 须 在 文件 
传输 完成 后 ， 才 能 进行 其 他 工作 。 而 Dreamweaver 8 提供 了 FTP 的 后 台 传 输 功 能 ， 这 使 得 
在 文件 传输 时 可 进行 其 他 操作 ， 如 新 建 和 编辑 页 面 等 。 

此 外 ，Dreamweaver 8 还 提供 了 一 种 功能 强大 的 文件 同步 功能 ， 这 可 以 确保 Web 服务 
器 上 的 内 容 始终 是 最 新 的 。 
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1.2” Dreamweaver 8 的 安装 


通过 上 一 节 的 学 习 ， 应 对 Dreamweaver 8 有 一 个 基本 的 了 解 。 在 这 一 节 中 ， 将 向 大 家 
介绍 Dreamweaver 8 运行 时 所 必须 具备 的 系统 环境 及 具体 的 安装 过 程 。 


1.2.1 系统 要 求 


Dreamweaver 8 对 系统 的 运行 环境 要 求 如 下 。 

@ CPU: 800 MHz Intel Pentium I 处 理 器 (或 相当 等 级 ) 或 更 高 
@ 内存: 256 MB RAM 或 更 高 

@ ”磁盘 空间 : 至 少 650 MB 可 用 磁盘 空间 

@ ”操作 系统 : Windows 2000/ XP 


1.2.2 Dreamweaver 8 的 安装 过 程 


Dreamweaver 8 安装 文件 的 大 小 约 为 60MB .下 面 , 具体 介绍 Dreamweaver 8 的 安装 过 程 。 
(1) 双击 安装 文件 ， 如 果 安 装 文件 是 一 个 压缩 文件 ， 系 统 将 首先 将 其 解压 。 如 图 1.13 
所 示 。 


汉 Dreamweaver 8 - InstallShield Wizard 


正在 解压 缩 文件 
正在 解压 缩 此 软件 包 的 内 容 。 


Installshield Wizard 正在 解压 缩 在 计算 机 中 安装 Dreamweaver 8 所 需 的 文件 ， 请 稍 候 。 
这 需要 一 些 时 间 。 


正在 读 取 软 件 包 的 内 容 … 


Instalshield 


< 请 温 (B] 


1.13 ”解压 文件 


(2) 解压 文件 完毕 后 ， 系 统 将 弹出 一 对 话 框 ， 提 示 系 统 正在 准备 安装 ， 即 进行 安装 前 
的 准备 工作 ， 如 图 1.14 所 示 。 
(3) 准备 工作 完成 后 ， 系 统 将 打开 安装 向 导 的 第 一 个 对 话 框 ， 如 图 1.15 所 示 。 
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windows Installer 


Ew | 


图 1.14 正在 准备 安装 


eaver 8 Installshield Wizard 
欢迎 使 用 Macromedia Dreamweaver 8 
Installshield Wizard 


lnstalshield(R) Wizard 格 要 在 您 的 计算 机 中 安装 Macromedia 
Dreamweaver 8 。 要 继续 ,请 单 击 "下 一 步 ”。 


警 省 : 本 程序 受 版 权 法 和 国际 条 约 的 保护 。 


图 1.15 【欢迎 使 用 】 对 话 框 
(4) 单 击 【下 一 步 】 按 钮 ， 进 入 【许可 证 协议 】 对 话 框 ， 如 图 1.16 所 示 。 


许可 证 协议 
请 仔细 阅读 下 面 的 许可 证 协议 . 


EDThS 软件 景 线 用 户 许可 协议 到 


注意 :在 您 同意 本 《最 终 用 户 许可 协议 》 (“EULA”) 并 继续 安装 软件 之 前 ， 
可 能 需要 向 下 漆 动 到 本 EULA 的 结尾 。 


要 说 明 : 本 协议 〔 即 “EULA”) 是 已 获 本 软件 许可 的 个 人 、 公 司 或 组 织 

《 "您 " 或 “客户 ”) 与 MACROMEDIA 之 赣 订 立 的 法 律 协议 。 安 装 和 使 用 本 软 

的 行为 表示 “客户 ”接受 了 本 软件 ， 并 且 同意 本 协议 的 条 款 。 请 在 完成 安装 过 
和 使 用 本 软件 之 前 仔细 阅读 本 协议 。 安 装 和 /或 使 用 本 软件 的 行为 表示 您 确认 

爱 了 本 软件 ， 并 且 同意 受到 本 协议 条 款 的 约 东 。 如 果 您 不 同意 受 这 些 条 款 的 约 到 | 


本 可 攻防 议 中 的 条 靳 (a 打印 (p) 


图 1.16 【许可 证 协议 】 对 话 框 


(5) 单 击 【 我 接受 该 许可 证 协议 中 的 条 款 】 单 选 按 钮 ， 单 击 【 下 一 步 】 按 钮 , 进入 【 目 
标 文件 夹 和 快捷 方式 】 对 话 框 ， 如 图 1.17 所 示 。 

(6) 选择 文件 所 要 安装 到 的 磁盘 目录 ， 并 选择 是 否 需 要 创建 快捷 方式 。 单 击 【下 一 步 】 
按钮 ， 进 入 【默认 编辑 器 】 对 话 框 ， 如 图 1.18 所 示 。 在 这 里 ， 可 以 将 Dreamweaver 8 与 某 
些 文件 类 型 进行 关联 ， 以 便 在 双击 这 些 类 型 的 文件 时 直接 调用 Dreamweaver 8 进行 编辑 。 

(7) 单 击 【 下 一 步 】 按 钮 进入 【已 做 好 安装 程序 的 准备 】 对 话 框 ， 如 图 1.19 所 示 。 
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1.19 【已 做 好 程序 安装 的 准备 】 对 话 框 


(8) 此 时 ， 安 装 前 的 设置 工作 已 全 部 完成 。 如 不 再 更 改 任何 安装 设置 ， 则 单 击 【安装 】 
按钮 ， 进 入 【正在 安装 】 对 话 框 ， 如 图 1.20 所 示 。 

(9) Dreamweaver 8 的 安装 过 程 一 般 包括 验证 安装 、 复制 新 文件 、 更 新 组 件 注册 表 等 几 
个 阶段 。 此 时 ， 用 户 无 须 进 行 操作 ， 安 装 程序 将 自动 完成 。 安 装 完 成 后 ， 将 自动 进入 【 安 
装 向 导 完 成 】 对 话 框 ， 如 图 1.21 所 示 。 


。10 。 
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风 Macromedia Dreanmever 1 Test RSE NE 
正在 安装 Macromedia Dreamweaver 8 CY macromedia 


wv 
正在 实 壬 名 寻 拓 和 程 放 功 内。 


ntalshildward 正在 安装 Macromedia resmwvesve 8 ,请 稍 代 .这 
和 要 几 公 各 和 时 辣 - 


1 


:EA | 下 -250> | 


1.20 【正在 安装 Dreamweaver 8】 对 话 框 


hedia Dreamweaver 8 Installshield Wizard 


Installshield Wizard 完 成 


alshield Wizard 成 功 地 安装 了 Macromedia Dreamweaver 
本 。 单 击 ' 完 成 退出 向 导 。 


FF 局 动 Macromedia Dreamweaver 8 


厂 显示 自述 文件 


1.21 InstallShield Wizard 完成 对 话 框 


(10) 在 此 对 话 框 中 ， 用 户 可 确定 是 否 在 安装 完成 后 启动 Macromedia Dreamweaver 8 或 
显示 自述 文件 。Dreamweaver 8 的 自述 文件 如 图 1.22 所 示 。 


ma ee 本 
和 和 人 玉 吉 们 注 i 失 内 | 和 名 站 于 本 PEA 克 垃 原 - 从 让 站 

en 一 个 入 奈 、 商 SR 字 工具。 开发 人 郧 可 以 
本 本 


全 了 一 此 二 要 邓 匠 浊 。 可 御 Myg 折 有 关 Uacromedia Draarmwesmi 的 更 多 全 和 


ease 
En 


Fat 
太吉 人 有关 Drearrweayer 829 和 大 二 区， 


2 
Nacromedis [lean et 生 全 了 名 村 本 天 。 可 宙 的 人 证 全 此生 五 字 三 Web 达到 
Deamwewer 关 了 时 有人 下 区 和 | Dresmwemer. DreamwearF RA C: 


在 汪 3 加 风尘 Web 丰 的 可 娃 性 可 性/ 


人 
其 和 汪 委 上 让 二 区 总 ， 作 bf 证 和 区 技 本 立 、 基 从 六 中 天 正六， 于 者 下 在 考 ， 必 和 全 全 兴 计 从 
知情 的 但: 项 有 生生 成 - 


Macromedie Dreammuav @ 要 村 二 


le 


EE mn 
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os 
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(11) 单 击 【 完 成 】 按 钮 ， 结 束 安装 。 至 此 ， 己 经 全 部 完成 Dreamweaver 8 的 安装 。 


1.3” ”Dreamweaver 8 的 工作 区 


安装 Dreamweaver 8 后 ， 就 可 以 通过 Dreamweaver 8 创建 自己 的 Web 站 点 了 。 在 使 用 
Dreamweaver 8 之 前 ， 首 先 认 识 一 下 Dreamweaver 8 的 工作 区 。 

Dreamweaver 8 的 工作 区 ， 是 用 户 操作 的 主要 界面 。 如 图 1.23 所 示 ，Dreamweaver 8 提 
供 了 一 个 将 全 部 元 素 置 于 一 个 窗口 中 的 集成 布局 。 在 集成 的 工作 区 中 ， 全 部 窗口 和 面板 都 
被 集成 到 一 个 更 大 的 应 用 程序 窗口 中 。 


标题 栏 菜单 栏 【 插 入 ]】 工具 栏 【文档 工具 栏 


TP & Rs 服务 器 
DD REAE 


习 ”丽质 习 一 cx alZz| 至 | 生 | 玫 | 于 
a mr | = 各 il 要 划 


【标签 】 选 择 器 [局 性 ] 面板 ey 面板 
图 1.23 ”Dreamweaver 8 的 工作 区 
1.3.1 【插入 】 工 具 栏 


【插入 】 工 具 栏 包含 用 于 将 各 种 类 型 的 对 象 (如 表格 、 图 形 、 链 接 等 ) 插 入 到 文档 中 的 
按钮 。 当 将 鼠标 移 到 一 个 按钮 上 时 ， 将 会 出 现 一 个 工具 提示 ， 即 该 按钮 的 名 称 。 在 
Dreamweaver 8 中 ， 各 种 对 象 的 按钮 分 别 被 组 织 到 不 同 的 类 别 中 ， 可 以 通过 单 击 【插入 】 工 
具 栏 左 侧 的 当前 类 别 按钮 ， 如 启用 按钮 进行 切换 。 

默认 情况 下 ，【 插 入 】 工 具 栏 包含 以 下 类 别 。 

@ 【和 常用 】 类 别 : 包含 了 最 常用 的 对 象 按钮 ， 如 表格 、 图 形 等 。 

@ 【布局 】 类别 : 包含 了 用 于 文档 布局 的 对 象 按钮 ， 如 表格 、DIV 标签 、 层 、 框 架 等 。 

@ 【表单 】 类 别 : 包含 了 用 于 创建 表单 和 插入 表单 元 素 的 对 象 按钮 ， 如 表单 、 复 选 
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框 、 单 选 按钮 、 下 拉 列 表 框 等 。 
@ 【文本 】 类 别 : 包含 了 各 种 文本 格式 设置 标签 和 列表 格式 设置 标签 ， 如 加 粗 、 和 斜 
体 、 标 题 、 项 目 列表 、 编 号 列表 等 。 
@ HTML 类 别 : 包含 了 常用 的 HTML 标签 ， 如 水 平 线 、 文 件 头 、 表 格 、 框 架 以 及 脚 
本 等 。 
@ 【应 用 程序 】 类 别 : 包含 了 用 于 插入 各 种 动态 元 素 的 对 象 按钮 ， 如 记录 集 、 重 复 
区 域 、 用 户 身 份 验证 、XSL 转换 等 。 
@ 【Flash 元 素 】 类 别 : 包含 了 用 于 插入 Flash 元 素 的 对 象 按 钮 。 
@ 【收藏 来】 类 别 : 用 于 将 【插入 】 工 具 栏 中 最 常用 的 按钮 分 组 和 组 织 到 某 一 公共 
位 置 ， 以 方便 用 户 使 用 。 
此 外 ， 如 果 当 前 文档 包含 服务 器 代码 时 (如 ASP.NET 文档 )，【 插 入】 工具 栏 还 会 显示 
其 他 相应 的 类 别 ， 如 ASP.NET 类 别 ， 如 图 1.24 所 示 。 


mv 名 友 | 明 尝 移 当量 | 如 中国 国 s 国 c 息 友 遇 


图 1.24 ASP.NET 类 别 
1.3.2 【标准 】 工 具 栏 


【标准 】 工 具 栏 包含 与 【文件 】 和 【编辑 】 菜单 中 的 常用 命令 功能 相同 的 按钮 ， 如 【新 
建 】、【 打 开 】、【 保 存 】、【 全 部 保存 】、【 打 印 代 码 】、【 剪 切 】、【 复 制 】、【 粘 贴 】、 
【撤消 】、【 重 做 】 等 。 


1.3.3 【文档 】 工 具 栏 


【文档 】 工 具 栏 包含 了 用 于 在 文档 的 不 同 视图 之 间 进 行 快速 切换 的 相关 按钮 ， 以 及 各 
种 查看 选项 和 一 些 与 常用 操作 相关 的 按钮 (如 验证 标记 、 文 件 管理 、 在 浏览 器 中 预览 /调试 
等 )。 


1.3.4 面板 组 


面板 组 是 组 合 在 一 个 标题 下 面 的 相关 面板 的 集合 。 通 过 单 击 面板 组 名 称 左 侧 的 展开 / 折 
登 按钮 ， 可 展开 /折合 所 有 面板 组 。 如 果 需 要 关闭 某 个 面板 组 ， 可 右 击 该 面板 组 ， 从 弹出 的 
快捷 菜单 中 选择 【关闭 面板 组 】 命 令 。 


1.3.5 【标签 】 选 择 器 


【标签 】 选 择 器 通常 位 于 文档 窗口 底部 的 状态 栏 中 ， 它 显示 了 环绕 当前 选 定 内 容 的 标 
签 的 层次 结构 。 单 击 该 层次 结构 中 的 任何 标签 ， 可 选择 该 标签 及 其 全 部 内 容 。 


1.3.6 【属性 】 面 板 


【属性 】 面 板 用 于 查看 和 编辑 当前 文档 中 所 选择 的 页 面 元 素 (如 插入 的 对 象 或 文本 ) 的 
常用 属性 。 所 选 的 页 面 元 素 不 同 ，【 属 性 】 面 板 中 的 选项 也 有 所 不 同 ， 有 时 差别 很 大 。 
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1.3.7 文档 窗口 

文档 窗口 显示 了 当前 创建 和 编辑 的 文档 。 
1.3.8 【文件 】 面 板 

【文件 】 面 板 用 于 管理 文件 和 文件 夹 ， 包 括 Dreamweaver 8 站 点 中 的 文件 、 远 程 服务 
器 上 的 文件 以 及 本 地 磁盘 中 的 所 有 文件 。 


1.4 自 定 义 Dreamweaver 8 开发 环境 


在 使 用 Dreamweaver 8 时 ， 可 以 通过 设置 一 些 选项 来 自 定 义 Dreamweaver 8 开发 环境 ， 
以 使 其 更 加 适合 我 们 的 需要 。 


1.4.1 选择 工作 区 布局 


在 1.1 节 中 , 提 到 Dreamweaver 8 提供 了 设计 器 和 编码 器 两 种 工作 区 布局 , 同时 在 首次 
启动 Dreamweaver 8 时 将 会 弹出 一 个 对 话 框 让 用 户 选 择 一 种 工作 区 布局 。 那 么 ， 当 用 户 选 
择 了 一 种 工作 区 布局 后 又 要 切换 到 另 一 种 工作 区 布局 ， 又 该 如 何 操作 呢 ? 

选择 【窗口 】 人 工作 区 布局 】 命 令 ， 然 后 选择 所 要 切换 的 工作 区 布局 ， 如 图 1.25 所 示 。 


图 1.25 选择 工作 区 布局 
在 可 选择 的 工作 区 布局 命令 中 ， 有 一 个 【双重 屏幕 】 命 令 。 如 果 此 时 用 户 的 计算 机 连 
接 了 两 个 显示 器 ， 则 可 在 一 个 显示 器 中 显示 【代码 】 视 图 ， 另 一 个 显示 器 中 显示 【设计 】 
视图 ， 如 果 仅 连接 了 一 个 显示 器 ， 则 【代码 】 视 图 和 【设计 】 视 图 将 分 为 两 个 窗口 显示 。 
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1.4.2 ”隐藏 和 显示 起 始 页 


一 般 情 况 下 ， 在 启动 Dreamweaver 8 时 以 及 在 每 次 没有 打开 任何 文档 时 ， 都 会 显示 
Dreamweaver 8 起 始 页 ， 如 图 1.26 所 示 。 


dd DREAMWEAVER 8 


打开 最 近 项 目 创建 新 项 目 从 范 避 创建 
已 天 主 HTML 加 css 理 怀表 
茵 couruslon 局 PE 
下 PHP © mait (css) 
匡 AsP vescript © 入 [项 面 
芋 ABPNET ce 屿 页面 和 it (有 畏 助 功能 向 》 
芋 Jomserpt 
十 ML 
总 XSLTC 可 页 ) 
下 css 
地 Dreamweavar 就 点 扩展 
回 更 多 轩 brezmweaverExehange 
“进入 Dreamweever 快速 指南 享用 Bresnveorer 8 的 物 章 补丁 程 
| 。 了 解 Dreamweaver 文 位 资源 dd 序 
。 查 拓 经 权 培 训 立即 下 过 最 新 的 产品 更 新 
不 再 显示 此 对 话 和 


图 1.26 ”Dreamweaver 8 起 始 页 


如 果 在 打开 Dreamweaver 8 时 不 再 让 其 显示 起 始 页 ， 可 选中 起 始 页 上 的 【不 再 显示 此 
对 话 框 】 复 选 框 。 

如 果 在 隐藏 起 始 页 后 ， 又 需要 显示 起 始 页 ， 则 可 选择 【编辑 】|【 首 选 参数 】 命 令 ， 在 
弹出 的 【首选 参数 】 对 话 框 的 【常规 】 类 别 中 (如 图 1.27 所 示 )， 选 中 【显示 起 始 页 】 复 选 
框 ， 单 击 【确定 】 按 钮 即 可 。 


首选 参数 Xx 
分 交 Ed = 站 
= 文 区 项 : 厂 显示 起 始 页 G) 
省 号 
友 打开 内 读 文 件 时 警 此 用 户 四) 
和 [rm 
后记 
换 外 过 项 揪 入 对 象 时 显示 对 话 械 
红 汪 反光 许 双 字 节 内 联 镁 入 外) 
件 闫 到 / 六 入 器 末 标 是 后 急 执 到 和 通用 
E | 厂 世 许 多 个 连续 的 空格 吧 ) 
征询 贤路 中 了 预览 厅 用 <strong> 和 em》 代 警 @> 和 <G>QD 
术 守 站 厅 使 用 Css 而 不 是 im 标签) 
给 克 在 @y 或 QI)-Q6》 标 和 中 要 可 区 城 时 发 出 间 兴 


历史 步 村 最 多 次 数 00: 50 
拼写 宇 奥 (G@)- [区 语 (美国 ) 了 


Ewes |ew | 


1.27 【首选 参数 】 对 话 框 
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设置 Dreamweaver 8 的 常规 外 观 


如 果 需 要 设置 Dreamweaver 8 的 常规 外 观 ， 可 选择 【编辑 】|【 首 选 参数 】 命 令 ， 在 弹 
出 的 对 话 框 的 【分 类 】 列 表 中 选择 【人 常规】 类别 ， 如 图 1.27 所 示 。 
在 此 对 话 框 中 可 设置 的 首选 参数 分 为 两 个 子 类 别 : 【文档 选项 】 和 【编辑 选项 】。 这 


1.4.4 


介绍 【编辑 选项 】 子 类 别 中 的 相关 选项 的 作用 。 


【插入 对 象 时 显示 对 话 框 】 复 选 框 用 来 设置 当 使 用 【插入 】 工 具 栏 或 【插入 】 菜 
单 插入 图 像 、 表 格 、Flash 对 象 或 其 他 某 些 对 象 时 ， 是 否 弹出 对 话 框 以 提示 输入 附 
加 的 属性 信息 。 如 果 取 消 对 此 选项 的 选择 ， 也 可 通过 【属性 】 面 板 来 设置 插入 对 
象 的 相关 属性 。 

【允许 双 字 节 内 联 输入 】 复 选 框 用 来 设置 是 否 允许 直接 将 双 字 节 文 本 输入 到 【 文 
档 】 窗 口中 。 如 果 禁 用 此 功能 ， 则 在 输入 双 字 节 文 本 时 将 显示 一 个 用 于 输入 和 转 
换 双 字 节 文本 的 文本 输入 窗口 ， 文 本 在 被 接受 后 方 显示 在 【文档 】 窗 口中 。 

eta 普通 段落 】 复 选 框 用 来 设置 在 【设计 】 视图 中 当 在 一 个 标题 段落 

的 结尾 按 下 Enter 键 时 ， 是 否 切换 到 普通 段落 。 如 果 选 中 该 选项 ， 则 在 标题 结尾 
按 下 ns 个 用 <p> 标 签 标记 的 新 段落 。 如 果 取 消 对 该 选项 的 选择 ， 
则 按 Enter 键 后 将 创建 一 个 用 同一 标题 标签 进行 标记 的 新 段落 。 

【允许 多 个 连续 的 空格 】 复 选 框 用 来 设置 在 【设计 】 视 图 中 输入 两 个 或 更 多 的 空 
格 时 是 否 不 中 断 的 空格 。 如 果 取 消 对 该 选项 的 选择 ， 则 所 输入 的 多 个 空格 将 被 当 
作 单 个 空格 进行 处 理 。 

【用 <strong> 和 <em> 代 蔡 <b> 和 <i>】 复 选 框 用 来 设置 ， 当 设置 文本 为 粗 体 或 斜体 

时 ， 是 否 使 用 <strong> 标 签 和 <em> 标 签 来 代替 <b> 标 签 和 <i> 标 签 。 

【使 用 CSS 而 不 是 HTML 标签 】 复 选 框 用 来 设置 ， 当 使 用 【属性 】 面 板 设置 文 
本 格式 时 是 否 使 用 CSS 样式 而 不 使 用 HTML 标签 。 默 认 情况 下 ，Dreamweaver 8 
会 使 用 CSS 样式 来 设置 文本 格式 , 即 在 每 次 设置 所 选 文 本 的 字体 、 大 小 或 颜色 时 ， 
均 会 创建 一 个 特定 于 该 文档 的 新 样式 。 如 果 取 消 对 该 选项 的 选择 ，Dreamweaver 8 
将 使 用 HTML 标签 来 设置 文本 的 相关 属性 。 

【在 <p> 或 <h1> 一 <h6> 标 签 中 放置 可 编辑 区 域 时 发 出 警告 】 复 选 杠 用 来 设置 
Dreamweaver 8 在 保存 一 个 段落 或 标题 标签 内 具有 可 编辑 区 域 的 Dreamweaver 8 模 
板 时 是 否 提示 警告 信息 ， 该 信息 会 提示 : 将 无 法 在 此 区 域 中 创建 更 多 段落 。 


设置 Dreamweaver 8 的 字体 显示 


根据 个 人 的 喜好 ， 可 以 自行 设置 在 Dreamweaver 8 的 代码 窗口 中 相关 文字 所 使 用 的 字 
体 及 大 小 。 如 需 执行 此 操作 ， 可 选择 【编辑 】|【 首 选 参数 】 命 令 ， 在 弹出 的 对 话 框 中 选择 
【字体 】 类 别 ， 如 图 1.28 所 示 。 


【字体 设置 】 列 表 框 用 于 指定 在 Dreamweaver 8 中 针对 使 用 给 定编 码 类 型 的 文档 
所 用 的 字体 集 。 

【均衡 字体 】 下 拉 列 表 框 用 于 设置 普通 文本 (如 段落 、 标 题 ) 所 使 用 的 字体 。 
【固定 字体 】 下 拉 列 表 框 用 于 设置 在 <pre>、<code> 和 <tt> 标 签 内 的 文本 的 字体 。 
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e 【代码 视图 】 下 拉 列 表 框 用 于 设置 在 代码 视图 中 的 所 有 文本 的 字体 。 


图 1.28 【字体 】 类 别 


1.4.5” 自 定义 快捷 键 


在 Dreamweaver 8 中 ， 根 据 个 人 的 操作 习惯 ,可 以 自 定义 各 项 操作 的 快捷 键 ， 包 括 新 
建 快捷 键 和 编辑 现 有 的 快捷 键 。 

选择 【编辑 】| 【快捷 键 】 命 令 ， 即 可 打开 【快捷 键 】 对 话 框 ， 如 图 1.29 所 示 。 

如 要 添加 快捷 键 ， 可 首先 在 【命令 】 下 拉 列 表 框 中 选择 一 个 命令 类 别 ， 然 后 在 其 下 面 
的 列表 框 中 选择 所 要 设置 快捷 键 的 命令 ， 单 击 团 按钮 ， 然 后 在 【按键 】 文 本 框 中 按 下 一 个 
组 合 键 ， 单 击 【 更 改 】 按 钮 即 可 。 


Cerl40 


Cerl4Shi ty0 


图 1.29 【快捷 键 】 对 话 框 


如 要 删除 一 个 指定 的 快捷 键 ， 可 在 【命令 】 列 表 框 中 选择 要 删除 快捷 键 的 命令 。 此 时 ， 
该 命令 的 快捷 键 将 出 现在 【快捷 键 】 列 表 框 中 。 选 择 要 删除 的 快捷 键 ， 单 击 国 按 钮 即 可 。 
如 要 编辑 现 有 的 快捷 键 ， 可 在 【命令 】 列 表 框 中 选择 要 编辑 快捷 键 的 命令 。 此 时 ， 该 
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命令 的 快捷 键 将 出 现在 【快捷 键 】 列 表 框 中 。 选 择 要 编辑 的 快捷 键 ， 在 【按键 】 文 本 框 中 
按 下 一 个 新 组 合 键 ， 单 击 【 更 改 】 按 钮 即 可 。 

需要 注意 的 是 , 对 于 Dreamweaver 8 预定 义 快捷 键 组 中 所 设置 的 快捷 键 是 不 能 被 删除 、 
添加 和 修改 的 。 此 时 ， 可 通过 单 击 型 按钮 ， 来 创建 一 个 当前 所 选择 命令 的 快捷 键 组 的 一 个 
副本 ， 然 后 在 【当前 设置 】 下 拉 列 表 框 中 选择 该 副本 ， 进 而 在 该 副本 上 进行 删除 、 添 加 和 
修改 。 单 出 图 | 按钮 ， 可 对 当前 所 选择 的 快捷 键 组 执行 重 命名 操作 ; 单 出 国 | 按 钮 ， 可 将 当 
前 所 选择 的 快捷 键 组 导出 至 HTML 文件 ， 单 击 吕 按钮， 可 删除 当前 所 选择 的 快捷 键 组 。 


1.5 ”典型 实例 : 通过 Dreamweaver 8 创建 ASP.NET 页 面 


本 节 将 通过 Dreamweaver 8 来 创建 一 个 简单 的 ASP.NET 页 面 , 使 读者 对 Dreamweaver 8 
和 ASPNET 的 结合 日 使 用 有 一 个 理性 的 认识 。 

(1) 启动 Dreamweaver 8， 选 择 【 文 件 】| 【新建 】 命 令 ， 此 时 将 弹出 【新 建文 档 】 对 
话 框 ， 如 图 1.30 所 示 。 


Rt 二 5 有 辅助 功能 的 ) 


1.30 【新 建文 档 】 对 话 框 


(2) 在 【类 别 ] 列 表 框 中 , 选中 【动态 页 】, 并 在 右 侧 的 【动态 页 ] 列 表 框 中 选择 ASPNET 
VB。 单 击 【 创 建 】 按 钮 ， 即 可 新 建 一 个 以 VB.NET 为 脚本 的 ASP.NET 页 面 。 

(3) 将 视图 切换 至 【设计 】 视 图 ， 单 击 【 属 性 】 面 板 中 的 【页 面 属性 】 按 钮 ， 在 弹出 
的 【页 面 属性 】 对 话 框 中 ， 选 择 【 外 观 】 类 别 ， 并 设置 页 面 字体 的 大 小 为 12px， 背 景 颜色 
值 为 #CCCCCC， 上 边 距 为 10px， 如 图 1.31 所 示 。 

(4) 在 【页 面 属性 】 文 本 框 中 ， 提 供 了 对 页 面 的 布局 和 基本 格式 的 设置 ， 包 括 页 面 的 
默认 字体 、 字 体 大 小 、 文 本 颜色 、 背 景 颜色 、 背 景 图 像 以 及 边 距 设置 等 。 单 击 【确定 】 按 
钮 ， 完 成 页 面 属 性 的 设置 。 

(5) 在 网 页 编辑 页 面 中 , 输入 文本 “请 随意 输入 内 容 ”， 然 后 选择 该 段 文本 , 单 击 【 属 
性 】 面板 中 的 天 按钮 ， 将 文本 居中 显示 。 然后 将 【插入 】 工 具 栏 中 的 类 别 切换 至 ASPNET， 
拖 动 芭 按钮 至 刚才 输入 的 文本 之 后 .在 弹出 的 [asp: 文 本 框 ] 对 话 框 中 ,设置 ID 为 TextBoxl， 
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【工具 提示 】 为 “请 随意 输入 内 容 ”， 如 图 1.32 所 示 。 单 击 【确定 】 按 钮 ， 完 成 文本 框 控 
件 的 插入 。 


图 1.31 【页 面 属性 】 对 话 框 


图 1.32 【asp: 文 本 框 】 对 话 框 


(6) 此 时 ， 页 面 将 会 伴随 着 文本 框 控件 ， 生 成 一 个 表单 (Form)， 同 时 带 有 属性 
"Runat=Server'。 选 择 所 创建 的 文本 ， 并 将 其 拖 动 至 表单 (Form) 内 的 文本 框 控件 之 前 。 然 后 ， 
在 文本 框 控件 之 后 ， 按 Enter 键 换 一 行 ， 单 击 【ASP.NET- 插 入 】 工 具 栏 中 的 台 按 钮 ， 在 弹 
出 的 【asp: 按 钮 】 对 话 框 中 ， 设 置 其 ID 为 Button1，【 文 本 】 为 “点 击 试 试 ”， 如 图 1.33 
所 示 。 


1.33 【asp: 按 钮 】 对 话 框 


(7) 单 击 【确定 】 按 钮 ， 此 时 在 页 面 上 将 添加 一 个 按钮 。 选 择 该 按钮 控件 并 右 击 ， 从 
弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 选择 【事件 】 
类 别 下 的 OnClick， 并 在 右 侧 的 文本 框 中 输入 Button1_Click， 如 图 1.34 所 示 。 
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图 1.34 【标签 编辑 器 】 对 话 框 


(8) 单 击 【 确 定 】 按 钮 ， 完 成 按钮 单 击 事件 的 设置 。 步 骤 (7) 指 定 了 当 单 击 该 按钮 时 所 
执行 的 事件 名 称 。 对 于 该 事件 的 具体 定义 ， 需 要 在 【代码 】 视 图 中 进行 编写 ， 这 将 在 稍 后 
进行 介绍 。 

(9) 将 光标 置 于 按钮 控件 之 后 ， 按 Enter 键 换行 ， 然 后 单 击 【ASPNET- 插 入 】 工 具 栏 
中 的 Ebd 按 钮 ， 在 弹出 的 【asp: 标 签 】 对 话 框 中 ， 设 置 ID 为 LblInfo， 如 图 1.35 所 示 。 


Co 


图 1.35 【asp: 标 签 】 对 话 框 
(10) 单 击 【 确 定 】 按 钮 ， 完 成 标签 控件 的 插入 。 选 择 该 标签 控件 并 右 击 ， 从 弹出 的 快 


捷 菜 单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 选 择 【 布 局 】 类 别 ， 
设置 其 前 景色 为 红色 ， 如 图 1.36 所 示 。 


EE 


图 1.36 【标签 编辑 器 】 对 话 框 
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(11) 单 击 【确定 】 按 钮 ， 完 成 标签 控件 的 设置 。 步 又 (10) 是 将 标签 中 的 文本 的 字体 颜 
色 设 置 为 红色 。 

(12) 切换 至 【代码 】 视 图 ， 为 按钮 控件 添加 单 击 事件 Button1_Click。 首 先 ， 将 光标 置 
于 <title> 标 签 之 前 ， 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 【页 面 载 入 】 按 钮 旱 ， 此 时 将 会 在 
光标 所 在 处 生成 一 段 脚本 代码 ， 如 图 1.37 所 示 。 


Saeta http-equiw"Contel FE content="text/htnl. charset=eb2312” 7> 


ataBind() 
I 


nd Sub 
K/script> 
| tit1e) 我 克 第 一 个 ASF. ET 页 面 *7titIe7 


1.37 ”自动 生成 的 脚本 


(13) 这 里 所 添加 的 Page Load 事件 是 页 面 加 载 时 将 首先 执行 的 事件 代码 ， 其 中 的 
DataBind(O 过 程 是 Dreamweaver 在 Page_Load 事件 中 默认 加 载 的 用 于 绑 定 数据 的 自 定 义 过 
程 。 在 本 页 面 中 ， 和 暂时 不 需要 Page_ Load 事件 ， 可 将 其 修改 为 Button1_Click 事件 ， 并 对 其 
代码 进行 修改 ， 如 图 1.38 所 示 。 


neta http-equir "Content-Type™ Content= text7htnI; 

Cscript runat="server”》 

人 Buttonl_Click(Src As Object, E AS EventArgs) 
是 : 


fscript runat=" server” 
|Sub Page_Load(Src As obje ct, E As EventAres) 
If Not IsPostBack Then 


charset=eb2312™ 75™ 


LblInfo. text=" 您 所 输入 的 : “二 TextBoxl. Text 


我 的 第 一 个 AsP。 NET 页 面 </title> 
图 1.38 ”Button1_Click 事件 


(14) 然后 ， 选 择 【 文 件 】|【 保 存 】 命 令 (或 按 下 快捷 键 Ctrl+S)， 在 弹出 的 【另存 为 】 
对 话 框 中 ， 选 择 C 盘 下 面 的 Inetpub 目录 中 的 wwwroot 子 目录 ， 并 将 文件 名 设置 为 
MyFirstPage.aspx。 


提示 : 这 里 的 C 盘 为 系统 盘 ( 如 果 您 的 操作 系统 是 装 在 其 他 盘 中 ， 请 选择 相应 的 系统 盘 )， 
而 WWWroot 文 件 夹 是 系统 在 安装 IIS 后 自动 设置 的 默认 发 布 目录 。 


(15) 一 个 简单 的 ASPNET 页 面 已 经 完成 。 接 下 来 可 以 进行 测试 ， 打开 浏览 器 ， 在 地 址 
栏 中 输入 “http:Wlocalhostmyfirstpage.aspx”， 按 Enter 键 即 可 打开 刚才 制作 的 页 面 ， 如 
图 1.39 所 示 。 

(16) 在 文本 框 中 输入 文本 信息 ， 单 击 【点 击 试 试 】 按 钮 ， 即 可 在 按钮 下 方 显 示 用 户 输 
入 的 文本 ， 如 图 1.40 所 示 。 


习 天 的 于 一 个 Aspvtr 页 面 - mcrosoft nterneEEXRIGEE | 


ncrosott Inte 可 
Ey [| 


HE DD A TAD 和 kt | 

EE EE "+" 辐 加 向 习 # 和 天 各 产权 
JESTTTTTTTTTT orp 司 eS 到 8 地 kt 四 kbYybaheeymfrseaos mx 柜 攻 2 
NgS: [站 加 FT 困 

点 击 试 这 点 古 这 
入 的 是 : 中 扩 ， 特区 
上 | 到 
奖章 [ [[ 某 和 mwaee 4 Ea 厂矿 国 Miraner 到 
1.39 页面 浏览 1.40 页面 浏览 
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(17) 这 里 有 一 个 小 问题 。 当 在 文本 框 中 输入 汉字 时 ， 在 单 击 【 点 击 试 试 】 按 钮 后 ， 可 
能 无 法 正常 显示 用 户 所 输入 的 内 容 ， 显 示 的 而 是 一 个 问号 “?”。 这 是 由 于 ASP.NET 不 支 
持 gb2312 传输 所 导致 的 。 解 决 办 法 很 简单 ， 切 换 至 【代码 】 视 图 ， 将 第 一 行 代码 中 的 
“ResponseEncoding="gb2312"” 去 掉 即 可 ， 如 图 1.41 所 示 。 


RO Paee Lanauaee" Wh Contentiype= text/htni™ 
《IDOCTYPE htnl PUBLIC “-//W3C//DID XHTIL 1.0 Transitional//EN” 
"http://wrw. w3. org/ TR/xhtnl1/DID/xhtnl1-transitional. dtd”》 删除 
<html xmlns="http://www. w3. org/1999/xhtml”> 


%> 


1.41 修改 代码 
1.6 本 题 
(1) 了 解 Dreamweaver 8 中 各 种 工具 栏 的 使 用 。 


(2) 了 解 【ASP.NET- 插 入 】 工 具 栏 中 各 个 标签 的 具体 含义 。 尝 试 在 页 面 中 插入 各 个 标 
签 ， 了 解 各 个 标签 相关 属性 的 设置 。 


志 训 广汉 
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众所周知 ，Dreamweaver 可 以 对 单个 的 页 面 文档 进行 处 理 。 但 更 多 的 情况 下 ， 
Dreamweaver 针对 的 是 整个 站 点 及 其 中 的 所 有 页 面 。 事 实 上 ，Dreamweaver 8 不 仅 提供 了 单 
个 页 面 的 编辑 功能 ， 而 且 还 提供 了 强大 的 站 点 管理 功能 。 

本 章 将 介绍 如 何 通 过 Dreamweaver 8 来 实现 对 站 点 的 操纵 。 


2.1 站 点 概述 


在 Dreamweaver 中 ,“ 站 点 ”一 词 既 可 以 表示 Web 站 点 , 可 以 表示 Dreamweaver 站 点 。 
所 谓 Web 站 点 ， 是 一 系列 的 文档 和 相关 资源 的 组 合 。 这 些 文档 可 以 相互 链接 ， 也 可 以 毫 无 
关系 ， 而 资源 则 包括 文档 中 所 调用 的 各 种 图 片 、Flash 动画 、CSS 文件 以 及 数据 库 等 。 简 单 
地 说 ， 一 个 网 站 就 是 一 个 Web 站 点 。 而 Dreamweaver 站 点 则 主要 用 于 管理 相应 的 Web 站 
点 ， 它 提供 了 一 种 组 织 所 有 与 Web 站 点 相关 联 的 文档 的 方法 。 通 过 Dreamweaver， 可 以 将 
站 点 上 传 到 Web 服务 器 上 ， 并 对 其 进行 自动 跟踪 、 维 护 链接 和 管理 文件 等 。 

在 设置 Dreamweaver 站 点 之 前 ， 首 先 必 须 了 解 以 下 几 个 基本 概念 。 

(1) 本 地 文件 夹 : 又 叫 本 地 站 点 ， 是 用 来 存储 站 点 文件 的 工作 副本 的 文件 夹 ， 它 也 是 
Dreamweaver 站 点 的 工作 目录 。 本 地 文件 夹 并 不 表示 其 存储 的 位 置 是 在 本 地 计算 机 上 ， 它 
也 可 以 位 于 网 络 服 务 器 上 。 在 Dreamweaver 中 ， 必 须 为 每 一 个 新 创建 的 Web 站 点 定义 一 个 
本 地 文件 夹 。 

(2) 远 端 文件 夹 : 又 叫 远 端 站 点 ， 是 用 户 在 运行 Web 服务 器 的 远程 计算 机 上 用 来 存储 
站 点 文件 的 工作 副本 的 文件 夹 。 远 端 文件 夹 与 本 地 文件 夹 是 相对 应 的 ， 在 最 常见 的 
Dreamweaver 工作 流程 中 , 用 户 在 本 地 文件 夹 (本 地 站 点 ) 对 文件 进行 创建 和 编辑 操作 ， 然 后 
将 其 上 传 到 远 端 文件 夹 (远程 站 点 ) 中 。 

(3) 测试 文件 夹 : 所 谓 测试 文件 夹 , 是 指 Dreamweaver 用 来 处 理 动 态 页 面 (如 ASPNET 
页 面 ) 的 文件 夹 。Dreamweaver 使 用 该 文件 夹 生 成 动态 内 容 并 在 工作 时 连接 到 数据 库 。 一 般 
情况 下 ， 测 试 文件 夹 与 远 端 文件 夹 为 同一 文件 夹 。 


2.2 新 建站 点 


在 了 解 了 Dreamweaver 中 的 站 点 定义 后 ， 下 面 来 看 如 何 新 建 一 个 站 点 。 
在 Dreamweaver 8 中 ， 使 用 站 点 定义 向 导 可 以 快速 新 建 一 个 站 点 ， 其 具体 步骤 如 下 。 


1. 设置 站 点 名 称 及 HTTP 地 址 
选择 【站 点 】 人 新建 站点】 命令 ， 此 时 系统 将 会 弹出 站 点 定义 的 向 导 对 话 框 ， 如 图 2.1 
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图 2.1 设置 站 点 名 称 


在 该 对 话 框 中 ， 首 先 必 须 输入 站 点 的 名 字 ， 这 里 的 名 字 仅 仅 是 一 个 代号 ， 用 于 在 
Dreamweaver 8 中 标识 你 所 定义 的 站 点 。 该 名 字 用 户 可 自行 定义 ,无 须 与 站 点 的 文件 夹 同名 。 
在 站 点 名 称 下 面 ， 可 指定 站 点 的 HTTP 地 址 (URL)。 通 过 该 地 址 ，Dreamweaver 可 确保 站 点 
根 目 录 相 对 链接 可 在 远 端 服务 器 上 工作 。 


2. 确认 是 否 使 用 服务 器 技术 


设置 完 站 点 名 称 及 HTTP 地 址 后 ， 单 击 【下 一 步 】 按 钮 ， 向 导 对 话 框 将 让 你 设置 是 否 
使 用 服务 器 技术 ， 如 图 2.2 所 示 。 


EEEETETI 


2.2 设置 是 否 打算 使 用 服务 器 技术 
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此 对 话 框 主要 是 询问 用 户 目前 所 创建 的 站 点 是 否 使 用 服务 器 技术 ， 如 ColdFusion、 
ASPNET、ASP、JSP、PHP 等 。 如 果 要 创建 的 站 点 为 静态 网 站 ， 则 可 单 击 【和 否 ， 我 不 想 使 
用 服务 器 技术 】 单 选 按钮 ， 如 果 要 创建 的 站 点 为 动态 网 站 ， 则 可 单 击 【是 ， 我 想 使 用 服务 
器 技术 】 单 选 按钮 ， 并 在 下 面 的 下 拉 列 表 框 中 选择 相应 的 服务 器 语言 。 


提示 : 静态 网 站 与 动态 网 站 的 区 别 ， 并 不 是 指 网 站 具 不 具备 Flash 动画 或 GIF 动画 ， 而 是 
指 网 站 具 不 具有 互动 性 。 所 谓 互动 性 ， 是 指 网 站 是 否 能 根据 用 户 的 要 求 或 选择 作出 
响应 ， 是 否 能 根据 不 同 的 条 件 链接 不 同 的 页 面 ， 是 否 能 与 数据 库 进行 交互 等 。 

3. 设置 开发 环境 
单 击 【 下 一 步 】 按 钮 ， 进 入 下 一 步 向 导 对 话 框 ， 如 图 2.3 所 示 。 


基本 | | 


站 点 定义 ee 


在 开发 过 程 中 ,你 打牌 加 何 全 用 您 的 文件 
在 本 地 进行 编辑 和 测试 我 的 惠 试 服务 器 是 这 台 计 算 机 》) 
个 全 用 本 嫉 风 站 直接 在 运程 测试 报 务 器 上 进行 屿 要 中) 


您 将 把 立 件 存 鱼 在 计算 机 上 的 什么 位 置 ? 
已 


由 于 计算 机 上 已 安装 了 ITS， 因 此 可 格 计 算 机 用 作 直 地 测试 服务 器 


《上 - 步 四 取消 天 助 


图 2.3 设置 如 何 使 用 您 的 文件 

此 对 话 框 主要 用 来 设置 站 点 的 开发 环境 ， 即 开发 过 程 中 如 何 对 文件 进行 处 理 ， 这 里 提 
供 了 3 个 选项 : 【在 本 地 进行 编辑 和 测试 】、【 在 本 地 进行 编辑 ， 然 后 上 传 到 远程 测试 服 
务 器 】 和 【使 用 本 地 网 络 直接 在 远程 测试 服务 器 上 进行 编辑 】。 

如 果 选 择 前 两 项 ， 系 统 将 要 求 输入 文件 的 存储 位 置 ， 即 站 点 的 工作 目录 ; 如 果 选 择 第 
3 项 ， 系 统 则 会 要 求 输入 远程 服务 器 的 地 址 。 
提示 : 对 于 初学 者 ， 考 虑 到 安全 性 ， 建 议 使 用 前 两 种 方式 来 处 理 站 点 。 

4. 测试 文件 

由 于 用 户 在 上 一 步 中 会 有 不 同 的 选择 ， 此 步 操作 也 会 有 不 同 。 这 里 ， 以 用 户 选 择 了 【在 
本 地 进行 编辑 和 测试 】 选 项 为 例 进行 介绍 。 当 用 户 在 第 3 步 操 作 中 选择 了 第 1 项 后 ， 单 击 
【下 一 步 】 按 钮 后 ， 系 统 将 弹出 如 图 2.4 所 示 的 对 话 框 。 

这 里 需要 设置 的 是 用 于 测试 的 URL 地 址 前 级。 一 般 来 说 ，URL 前 级 不 包括 任何 文件 
名 ， 它 由 域名 和 Web 站 点 的 主 目录 的 任何 一 个 子 目录 或 虚拟 目录 组 成 。 如 果 Dreamweaver 


人 
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与 Web 服务 器 运行 在 同一 台 计 算 机 上 ， 则 可 使 用 localhost 来 代替 域名 。 单 击 【 测 试 URL】 
按钮 ， 可 测试 所 设置 的 URL 前 级 是 否 正确 。 


点 证 多 有 


2.4 设置 测试 用 的 URL 地 址 前 缀 
5. 设置 是 否 使 用 远程 服务 器 
单 击 【下 一 步 】 按 钮 ， 系 统 将 弹出 如 图 2.5 所 示 的 对 话 框 。 


图 2.5 设置 是 否 使 用 远程 服务 器 


该 对 话 框 主要 用 来 设置 当 编辑 完 每 一 个 文件 后 ， 是 否 将 其 复制 到 远程 服务 器 上 。 如 果 
选择 【 否 】 单 选 按钮 ， 则 系统 将 跳 过 第 6 步 和 第 7 步 操作 ， 直 接 进入 第 8 步 。 


6. 设置 如 何 连 接 远 程 服务 器 
车 用 户 在 第 5 步 操作 中 选择 了 【是 的 ， 我 要 使 用 远程 服务 器 】 单 选 按钮 ， 则 接 下 来 向 
导 将 让 你 对 远程 服务 器 进行 设置 ， 如 图 2.6 所 示 。 


。26 。 


。27 。 


‘+S 取 玫 有 


图 2.6 设置 如 何 连接 远程 服务 器 


在 【您 如 何 连接 到 远程 服务 器 】 下 拉 列 表 框 中 ,包括 FTP、【 本 地 /网 络 】、WebDAV、 
【SourceSafe 数据 库 】、RDS 等 选项 。 


如 果 远 程 服务 器 为 本 地 计算 机 或 在 本 地 网 络 中 ， 可 选择 【本 地 /网 络 】 选 项 。 

如 果 与 远程 服务 器 之 间 的 文件 传递 是 通过 FTP 进行 的 , 则 可 选择 FTP 选项 。 此 时 ， 
还 需 设 置 FTP 地 址 、 存 储 在 服务 器 上 的 文件 夹 名 、FTP 用 户 名 、FTP 密码 等 信息 。 
如 果 使 用 WebDAV( 基 于 Web 的 分 布 式 创 作 和 版 本 控制 ) 协 议 与 远程 服务 器 连接 ， 

则 可 选择 WebDAYV 选项 .此 时 , 还 需 设 置 WebDAV 服务 器 的 URL 地 址 ` WebDAV 
用 户 名 与 WebDAYV 密码 。 

如 果 选 择 【SourceSafe 数据 库 】 选 项 ， 则 表示 通过 Microsoft Visual SourceSafe 与 
远程 服务 器 进行 连接 。 此 时 , 必须 保证 服务 器 上 安装 了 Microsoft Visual SourceSafe 
Client。 

如 果 选 择 RDS 选项 ， 则 表示 将 通过 RDS( 远 端 开发 服务 ) 连 接 到 远程 服务 器 上 。 此 
时 ， 远 端 文件 夹 必须 位 于 运行 ColdFusion 的 计算 机 上 。 


7. 存 回 和 取出 文件 设置 


单 


f#【 下 一 步 】 按 钮 ， 向 导 将 询问 是 否 启用 存 回 和 取出 文件 ， 如 图 2.7 所 示 。 


如 果 是 在 协作 环境 中 工作 (或 者 在 多 台 计算 机 上 独自 工作 )， 则 可 启用 存 回 和 取出 文件 


功能 。 出 


»” 旦 . 
无 


使 用 本 


功能 可 防止 他 人 编辑 自己 目前 正在 编辑 的 文件 ， 以 确保 文件 的 完整 性 。 其 中 , “ 取 
前 调 用 远程 服务 器 上 的 文件 副本 并 覆盖 本 地 文件 ，“ 存 回 ” 是 指 将 本 地 文件 存 回 ， 
也 文件 副本 覆盖 远程 文件 。 当 取出 文件 时 ， 该 文件 在 服务 器 上 将 处 于 不 可 用 状态 ， 


其 他 人 也 无 法 使 用 Dreamweaver 编辑 该 文件 ， 当 存 回 文件 时 ， 该 文件 在 服务 器 上 将 恢复 可 


其 他 人 可 继续 使 用 、 取 出 和 编辑 。 一 般 情况 下 ， 无 须 启用 存 回 和 取出 功能 。 


Ss 
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图 2.7 存 回 和 取出 文件 设置 
8. 站 点 设置 总 结 


在 此 步 操 作 中 ， 系 统 将 总 结 并 显示 前 面 用 户 所 设置 的 各 项 信息 ， 如 图 2.8 所 示 。 


点 定义 为 x|| 


图 2.8 站 点 设置 总 结 
如 果 设 置 没 有 问题 ， 则 可 单 击 【完成 】 按 钮 完成 新 建站 点 操作 ; 否则 ， 单 击 【 上 一 步 】 
按钮 ， 返 回 相应 的 设置 进行 修改 。 
至 此 ， 新 建站 点 操作 全 部 完成 。 如 果 新 建站 点 的 本 地 文件 夹 内 已 有 文件 ， 则 系统 将 会 
立刻 启用 文件 缓存 ， 并 将 站 点 内 的 所 有 文件 导入 至 【文件 】 面 板 中 ， 以 便 用 户 操作 ， 如 
图 2.9 所 示 。 
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图 2.9 新 建站 点 显示 在 【文件 】 面 板 中 
2.3 管理 站 点 


新 建站 点 之 后 ,还 可 以 对 已 有 的 站 点 进行 管理 ,其 操 
作 包括 编辑 站 点 、 复 制 站 点 、 删 除 站 点 、 导 出 站 点 和 导入 
站 点 等 。 

选择 【站 点 】| 【管理 站 点 】 命 令 ， 此 时 系统 将 弹出 
【管理 站 点 】 对 话 框 ， 如 图 2.10 所 示 。 

在 此 对 话 框 中 , 列 出 了 目前 已 创建 的 所 有 站 点 ， 同 时 
提供 了 用 于 对 站 点 进行 管理 的 多 个 按钮 。 单 击 相应 的 按 
钮 ， 即 可 对 站 点 执行 相应 的 操作 。 全 


2.3.1 编辑 站 点 


在 【管理 站 点 】 对 话 框 中 ， 选 择 要 编辑 的 站 点 ， 单 击 【 编 辑 】 按 钮 ， 系 统 将 弹出 如 
图 2.11 所 示 的 对 话 框 。 

通过 “2.2 新 建站 点 ”一 节 的 学 习 ， 大 家 也 许可 以 发 现 用 来 编辑 站 点 的 对 话 框 实际 上 
就 是 【站 点 定义 】 对 话 框 ， 只 是 切换 到 了 【高 级 】 选 项 卡 。 对 初学 者 来 说 ， 可 通过 站 点 定 
义 向 导 来 新 建站 点 ; 而 对 熟悉 Dreamweaver 的 用 户 ， 则 可 在 【站 点 定义 】 对 话 框 的 【高 级 】 
选项 卡 中 新 建站 点 。 

在 【高 级 】 选 项 卡 中 ， 可 设置 的 站 点 信息 包括 本 地 信息 、 远 程 信息 、 测 试 服务 器 、 遮 
盖 、 设 计 备注 、 站 点 地 图 布局 、 文 件 视图 列 和 Contribute 八 类 。 
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1. 本 地 信息 


【本 地 信息 】 类 别 下 的 选项 主要 用 于 设置 新 建站 点 的 本 地 文件 夹 ， 各 选项 如 图 2.11 所 
示 。【 本 地 信息 】 类 别 中 的 各 项 设置 含义 如 下 。 
【站 点 名 称 】: 新 建站 点 的 名 称 。 
【本 地 根 文 件 夹 】: 在 本 地 磁盘 中 存储 站 点 文件 的 文件 夹 。 
【自动 刷新 本 地 文件 列表 】: 表示 每 次 将 文件 复制 到 本 地 站 点 时 ， 是 否 自动 刷新 
本 地 的 文件 列表 。 取 消 此 选项 ， 可 提高 Dreamweaver 的 速度 ， 但 意味 着 本 地 的 文 
件 列表 将 不 会 自动 刷新 ， 用 户 需 通过 【文件 】 面 板 工具 栏 中 的 【刷新 】 按 钮 来 手 
动 刷新 文件 列表 。 
【默认 图 像 文件 夹 】: 设置 站 点 的 默认 图 像 文件 夹 ， 该 文件 夹 也 是 Dreamweaver 
上 传 用 户 添加 到 站 点 上 的 图 像 的 默认 保存 位 置 。 
【链接 相对 于 】: 设置 站 点 中 所 创建 的 链接 的 相对 路 径 。 默认 情况 下 , Dreamweaver 
使 用 文档 相对 路 径 创 建 链接 。 如 果 选 择 站 点 根 目 录 相 对 路 径 ， 则 必须 在 下 面 的 


【HTTP 地 二 
【HTTP 地 二 
【区 分 大 小 写 的 链接 】: 用 于 设置 在 Dreamweaver 检查 链接 时 是 否 区 分 链接 的 大 
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喜洋洋 酒 业 网 站 的 站 点 定义 为 EE 


本 地 信息 


让 AS 称 四 :FEIRR 
本 地 要 文件 迹 加 ): [< \inetpub\rrroot\ 喜 汶 洋 渔业 网 站 \ 已 
厅 BB 动 习 新 本 地 文件 列表 @) 
MYHD: 
和 相对 于 ;6 文档 甸 站 点 根 目录 G@) 


3TTP 地 址 00: 人 ttp /rere xiyaneyanejiu con/ 


CE ww | ww | 


2.11 站 点 定义 高 级 设置 对 话 杠 


上 】 文本 框 中 指定 站 点 所 使 用 的 URL 地 址 。 


E】: 指定 站 点 所 使 用 的 URL 地 址 。 


小 写 与 文件 名 的 大 小 写 是 否 匹 配 。 此 选项 通常 用 于 区 分 文件 名 大 小 写 的 UNIX 系 


统 中 。 
【缓存 】: 


远程 信息 


2. 远 


【远程 信息 】 类 别 下 的 选项 主要 用 于 设置 新 建站 点 的 远 端 文件 夹 ， 各 选项 如 图 2.12 
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用 于 指定 是 否 创建 站 点 缓存 以 提高 链接 和 站 点 管理 任务 的 速度 。 
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所 示 。 
= 访问 罗 : [村 地 /网络 司 
En 
BE 厂 自动 刷新 运程 文件 刘表 全 
民 扒 护 同步 信息 员 
和 
CE wm | ww | 
图 2.12 【远程 信息 】 类 别 下 的 选项 
各 选项 的 含义 如 下 。 
e@ 【访问 】: 用 于 设置 连接 远程 服务 器 的 访问 方式 ， 其 具体 选项 说 明 详 见 2.2 节 中 
新 建站 点 的 第 6 步 操 作 。 
@ 【 远 端 文件 夹 】: 用 于 设置 在 远程 服务 器 上 存储 站 点 文件 的 工作 副本 的 文件 夹 。 
@ 【自动 刷新 远程 文件 列表 】: 用 于 设置 在 添加 和 删除 文件 时 是 否 自动 更 新 【文件 】 
面板 中 的 【远程 视图 】 窗 格 。 
e@ 【维护 同步 信息 】: 用 于 设置 是 否 自动 同步 本 地 和 远 端 文件 。 
@ 【保存 时 自动 将 文件 上 传 到 服务 器 】: 用 于 设置 是 否 在 保存 文件 时 自动 将 文件 上 
传 到 远程 站 点 。 
@ 【启用 存 回 和 取出 】: 用 于 设置 是 否 启 用 存 回 和 取出 功能 ， 详 见 2.2 节 中 新 建站 
点 的 第 7 步 操作 。 


3. 测试 服务 器 


【测试 服务 器 】 类 别 下 的 选项 主要 用 于 指定 Dreamweaver 用 来 处 理 动态 页 面 (如 
ASP.NET 页 面 ) 的 测试 服务 器 的 相关 设置 ， 各 选项 如 图 2.13 所 示 。 

各 选项 的 含义 如 下 。 

@ 【服务 器 模型 】: 设置 站 点 所 使 用 的 服务 器 技术 。 

@ 【访问 】: 设置 访问 测试 服务 器 的 访问 方式 ， 其 选项 包括 【无 】、FTP、【 本 地 / 
网 络 】 和 WebDAV。 

@ 【测试 服务 器 文件 夹 】: 设置 在 测试 服务 器 上 用 来 存储 站 点 文件 的 工作 副本 的 文 
件 夹 。 

@ 【自动 刷新 测试 文件 列表 】: 确认 在 添加 和 删除 文件 时 是 否 自动 更 新 【文件 】 面 
板 中 的 【测试 服务 器 】 窗 格 。 


。31 。 


> Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


e 【URL 前 级 】: 设置 用 于 测试 的 URL 地 址 前 绥 。 一 般 来 说 ，URL 前 组 不 包括 任 
何 文件 名 。 


图 2.13 【测试 服务 器 】 类 别 下 的 选项 
4. 遮盖 


【遮盖 】 类 别 下 的 选项 主要 用 于 设置 是 否 启用 遮盖 功能 以 及 遮盖 特定 的 文件 类 型 ， 各 
选项 如 图 2.14 所 示 。 


图 2.14 【遮盖 】 类 别 下 的 选项 
所 谓 遮 盖 ， 是 指 在 所 有 站 点 操作 中 的 排除 指定 的 文件 夹 和 文件 。 这 里 的 站 点 操作 包括 
以 下 几 类 。 
@ 上传、 获取 操作 。 


。32 。 


第 2 章 站 点 操纵 “33。 


存 回 、 取 出 操作 。 
同步 操作 。 
使 用 【资源 】 面 板 内 容 。 
查找 较 新 的 本 地 文件 和 查找 较 新 的 远 端 文件 。 
执行 站 点 范围 的 操作 ， 如 检查 和 更 改 链接 。 
生成 报告 。 

@ ”更 新 模板 和 库 。 

通过 遮盖 功能 ， 可 以 在 以 上 列 出 的 站 点 操作 中 屏蔽 指定 的 文件 来 或 指定 文件 类 型 的 文 
件 ， 但 注意 不 能 屏蔽 单个 文件 。 

如 要 遮盖 文件 夹 ， 可 在 【文件 】 面 板 中 选择 要 进行 遮盖 的 文件 夹 ， 然 后 右 击 ， 在 弹出 
的 快捷 菜单 中 选择 【遮盖 】|【 遮 盖 】 命 令 即 可 。 

如 要 遮盖 指定 文件 类 型 的 文件 ， 可 在 如 图 2.14 所 示 的 【遮盖 】 类 别 中 选中 【遮盖 具有 
以 下 扩展 名 的 文件 】 复 选 框 ， 然 后 在 下 面 的 文本 框 中 输入 要 遮盖 的 文件 类 型 的 扩展 名 。 如 
果 有 多 个 文件 类 型 ， 可 通过 空格 进行 分 隔 。 

如 要 取消 【遮盖 】 功 能 ， 在 【和 遮盖】 类 别 中 取消 对 【启用 遮盖 】 复 选 框 的 选择 即 可 。 

5. 设计 备注 

【设计 备注 】 类 别 下 的 选项 可 帮助 用 户 对 设计 备注 信息 进行 维护 ， 各 选项 如 图 2.15 
所 示 。 


喜洋洋 酒 业 网 站 的 站 点 定义 为 


和 设计 备注 : 维护 设计 备注 时 ) 清理 已 … 
Re 
Lp 


厂 上 传 并 共享 设计 备注 QD 


Le 


Ce ww | ww | 


图 2.15 【设计 备注 】 类 别 下 的 选项 


设计 备注 是 指 用 户 在 Dreamweaver 中 为 文件 所 创建 的 备注 信息 。 设 计 备 注 与 它们 所 描 
述 的 文件 相关 联 ， 但 存储 在 单独 的 文件 中 。 可 以 在 展开 的 【文件 】 面 板 上 看 到 哪些 文件 有 
设计 备注 ， 通 常 【 设 计 备注 】 图 标 会 出 现在 【备注 】 列 中 ， 如 图 2.16 所 示 。 

在 图 2.16 中 ,文件 CnnDb.Asp 所 在 行 的 【备注 】 列 显示 了 【设计 备注 】 图 标 ， 表 示 该 


3 
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文件 存在 相关 的 备注 信息 。 此 时 ， 双 击 该 图 标 ， 即 可 查看 详细 的 备注 信息 ， 如 图 2.17 所 示 。 


【设计 备注 】 图 标 


3KB Active Server Page 
article. asp 10KB Active Server Page 
cn asp GKB Active Server Page 
cntp. asp GKB Active Server Page 
nxw_mx. asp GKB Active Server Page 
cpbl. asp SKB Active Server Page 
cpbl_qhe. asp 12KB Active Server Page 
cpbl_xyy. asp 12KB Active Server Page 
defaultl. asp 21B Active Server Page 
downfile asp 3KB Active Server Page 
gejj. asp IKB Active Server Page 
Eees asp BKB Active Server Page 
gsjg asp GKB Active Server Page 
jj. asp IKB Active Server Page 
es1l.asp TIB Active Server Page 


1 2007-4-6 15:11 


2007- 4-6 15:11 
2007-4-6 15;11 
2007-4-6 15;11 
2007-4-6 15:11 
2007-4-6 15:11 
2007-4-6 15:11 
2006-6-24 21:42 
2006-6-26 23:36 
2006-6-27 0:49 
2006-6-27 0:33 
2006-6-27 0:36 
2006-6-26 22:25 
2006-6-26 22:26 
2006-6-26 22:26 
2006-6-26 22:26 
2006-6-24 1:20 
2006-6-26 22:27 
2006-6-26 22:16 
2006-6-26 22:27 
2006-6-26 22:28 
2006-6-26 22:28 


要 查看 测试 服务 器 文件 ， 
单 击 局 报 半 。 


图 2.16 显示 【设计 备注 】 

如 果 要 为 文件 添加 备注 信息 ， 可 在 【文件 】 面 板 中 选择 文件 ， 然 后 右 击 ， 在 弹出 的 快 
捷 菜 单 中 选择 【设计 备注 】 命 令 ， 此 时 将 弹出 如 图 2.17 所 示 的 【设计 备注 】 对 话 框 。 在 【 备 
注 】 文 本 框 中 输入 备注 信息 ， 单 击 【 确 定 】 按 钮 即 可 。 


基本 信息 | 所 有 信息 | CE 
文件 :。 conDb Asp | 
位 置 。 :浏阳 河 网 站 \ 喜 洋洋 汪 业 和 助 
| 


2.17 【设计 备注 】 对 话 框 


在 如 图 2.15 所 示 的 【设计 备注 】 类 别 中 ， 可 对 已 添加 的 设计 备注 信息 进行 管理 。 单 击 
【清理 】 按 钮 ， 可 删除 没有 和 文件 相关 联 的 设计 备注 信息 。 选 中 【上 传 并 共享 设计 备注 】 
将 与 站 点 相关 的 设计 备注 信息 上 传 至 远程 服务 器 中 ， 这 样 可 以 与 他 人 一 起 共享 


复 选 框 ， 可 
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设计 备注 。 如 果 取 消 此 选项 ， 则 Dreamweaver 仅 在 本 地 文件 夹 中 维护 设计 备注 ， 而 不 会 将 
其 与 站 点 文件 一 起 上 传 。 


6. 站 点 地 图 布局 


【站 点 地 图 布局 ] 类 别 下 的 选项 可 对 站 点 地 图 的 外 观 进 行 自 定义 设置 , 各 选项 如 图 2.18 
所 示 。 


图 2.18 【站 点 地 图 布局 】 类 别 下 的 选项 


站 点 地 图 实际 上 就 是 一 个 站 点 结构 的 示意 图 ， 它 从 主页 开始 显示 两 个 级 别 深度 的 站 点 
结构 。 站 点 地 图 将 页 面 显 示 为 图 标 , 并 按 在 源 代码 中 出 现 的 顺序 来 显示 链接 , 如 图 2.19 所 示 。 


[a 


图 2.19 ”站 点 地 图 
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各 选项 的 含义 如 下 。 

@ 【主页 】: 用 于 确定 站 点 的 主页 ， 其 文件 必须 是 在 本 地 站 点 上 ， 这 是 站 点 地 图 所 
必须 设置 的 。 如 果 没 有 设置 站 点 主页 或 所 设置 的 主页 文件 无 法 找到 ， 则 当 打 开 站 
点 地 图 时 ， 系 统 将 提示 选择 主页 。 

@ 【 列 数 】: 设置 站 点 地 图 窗口 中 每 行 所 显示 的 列 数 。 

@ 【 列 宽 】: 设置 站 点 地 图 中 每 列 的 宽度 (以 像素 为 单位 )。 

@ 【图 标 标签 】: 设置 在 站 点 地 图 中 与 文档 图 标 一 起 显示 的 名 称 是 文件 名 称 还 是 页 
面 标题 。 

@ 【显示 标记 为 隐藏 的 文件 】: 确认 在 站 点 地 图 中 是 否 显示 用 户 标记 为 隐藏 的 页 面 
文件 。 

@ 【显示 相关 文件 】: 确认 在 站 点 地 图 中 是 否 显 示 该 站 点 层次 结构 中 的 所 有 相关 
文件 。 

7. 文件 视图 列 


【文件 视图 列 】 类 别 下 的 选项 主要 用 于 对 【文件 】 面 板 中 所 显示 的 文件 视图 列 进行 设 
置 ， 各 选项 如 图 2.20 所 示 。 


Bd (| EE 引 相 


EE J 
点 局 名称 bi 显示 
备 证 办 村 Ea 
Fontribute 大 小 内置 星 示 
a 内 时 下 
修 避 内 置 显示 
取出 者 六 置 RR 到 


Ce] ww | ww | 


图 2.20 【文件 视图 列 】 类 别 下 的 选项 

在 此 对 话 框 中 ， 可 以 对 文件 视图 列 进行 添加 和 删除 操作 ， 以 及 设置 列 的 显示 顺序 及 相 
关 属 性 。 

如 要 添加 列 ， 可 单 击 国 | 按钮 ， 在 下 面 的 【 列 名 称 】 文 本 框 中 输入 该 列 的 显示 名 称 ， 分 
别 在 【与 设计 备注 关联 】 和 【对 齐 】 下 拉 列 表 框 中 选择 与 设计 备注 关联 的 值 以 及 对 齐 方 式 ， 
单 击 【 确 定 】 按 钮 即 可 。 
提示 : 只 有 在 【与 设计 备注 关联 】 下 拉 列 表 框 中 设置 相应 的 值 ， 该 列 在 【文件 】 面 板 中 才 

会 显示 数据 。 
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如 要 删除 列 ， 可 在 上 方 列表 中 选择 要 删除 的 列 ， 单 击 三 按钮 即 可 。 这 里 仅 能 删除 用 户 
新 添加 的 列 。 对 于 Dreamweaver 中 内 置 的 文件 视图 列 ， 如 果 不 想 让 它 显示 ， 可 取消 该 列 的 
【显示 】 选 项 。 

通过 单 击 膏 | 按钮 和 国 按 钮 , 可 更 改选 定 列 的 显示 顺序 。 但 【名 称 】 列 的 顺序 无 法 更 改 ， 
它 始终 显示 为 第 一 列 。 


8. Contribute 


Contribute 类 别 下 的 选项 主要 用 于 设置 是 否 启用 Contribute 兼容 性 ， 其 选项 如 图 2.21 
所 示 。 


喜洋洋 酒 业 网 站 的 站 点 定义 为 
Contritute 
让 
i. 六 :三 启用 Contribate 著作 
国人 RE 伐 险 明 硬 
CE ww | ww | 


图 2.21 Contribute 类 别 下 的 选项 


Contribute 是 一 个 站 点 管理 工具 , 它 结 合 了 Web 浏览 器 和 基本 的 Web 页 编辑 器 的 功能 ， 
可 对 站 点 进行 管理 。Contribute 拥有 一 个 网 站 的 所 有 复杂 的 程序 代码 , 同时 它 还 提供 了 一 个 
类 似 于 Word 处 理 器 的 工具 ， 帮 助 用 户 处 理 页 面 中 的 文本 及 表格 。 

如 果 启 用 Contribute 兼容 性 ， 则 可 通过 Dreamweaver 启动 Contribute 来 执行 站 点 管理 
任务 。 但 是 ， 必 须 保证 Dreamweaver 与 Contribute 安装 在 同一 台 计 算 机 上 。 


2.3.2 复制 站 点 


如 果 希 望 创建 多 个 结构 相同 或 类 似 的 站 点 ， 可 利用 站 点 的 复制 功能 。 首 先 创建 一 个 基 
准 站 点 ， 并 以 该 站 点 为 基础 复制 出 多 个 站 点 ， 然 后 根据 需要 分 别 对 各 站 点 进行 编辑 ， 这 样 
可 大 大 提高 工作 效率 。 

复制 站 点 的 操作 很 简单 ， 在 如 图 2.10 所 示 的 【管理 站 点 】 对 话 框 中 ， 选 择 要 复制 的 站 
点 ， 单 击 【 复 制 】 按 钮 ， 即 可 复制 出 一 个 新 站 点 。 新 站 点 将 显示 在 【管理 站 点 】 对 话 框 的 
站 点 列表 中 ， 其 名 称 在 原 站 点 名 称 的 基础 上 添加 了 “复制 ”两 个 字 ， 如 图 2.22 所 示 。 
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新 复制 的 站 点 


2.22 复制 站 点 


2.3.3 删除 站 点 


如 果 不 再 需要 利用 Dreamweaver 对 某 个 站 点 进行 操作 ， 可 将 其 从 站 点 列表 中 删除 ， 其 
操作 如 下 。 

在 如 图 2.10 所 示 的 【管理 站 点 】 对 话 框 中 ， 选 择 要 删除 的 站 点 ， 单 击 【删除 】 按 钮 ， 
即 可 将 其 从 站 点 列表 中 删除 。 


提示 : 删除 操作 实际 上 只 是 删除 了 Dreamweaver 与 该 站 点 之 间 的 关系 ， 而 不 会 真正 删除 站 
点 文件 。 实 际 的 站 点 文件 仍 保留 在 原来 的 磁盘 位 置 上 ， 可 以 重新 创建 指向 其 位 置 的 
新 站 点 ， 对 其 进行 重新 管理 。 


2.3.4 导出 站 点 


为 了 做 好 站 点 的 备份 工作 ， 用 户 可 以 将 指定 的 站 点 导出 为 一 个 站 点 定义 文件 。 注 意 ， 
这 里 导出 的 仅仅 是 站 点 的 相关 设置 信息 ， 不 包括 站 点 文件 。 

要 执行 站 点 导出 功能 ， 可 在 如 图 2.10 所 示 的 【管理 站 点 】 对 话 框 中 ， 选 择 所 要 导出 的 
站 点 ， 单 击 【导出 】 按 钮 ， 在 弹出 的 【导出 站 点 】 对 话 框 中 选择 要 保存 的 位 置 ， 输 入 文件 
名 ， 单 击 【保存 】 按 钮 即 可 。 


BeManage 
PeanutHula ,7.1.1_5etup_PConine 


Ra EGG 
保存 类 型 加 ) 5 [站 点 定义 文件 ee ste) 了 取消 


2.23 【导出 站 点 】 对 话 框 
导出 的 站 点 文件 为 以 .ste 为 扩展 名 的 XML 文件 , 可 通过 “记事 本 ”将 其 打开 , 如 图 2.24 
所 示 。 
由 此 可 见 ， 站 点 定义 文件 中 所 包含 的 仅仅 是 该 站 点 的 设置 信息 。 
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此 外 ， 还 可 以 同时 导出 多 个 站 点 。 其 具体 操作 如 下 。 

(1) 选取 多 个 站 点 。 对 于 多 个 站 点 的 选择 有 两 种 方式 ， 对 于 多 个 间隔 的 站 点 ， 可 按 住 
Ctrl 键 单 击 每 个 站 点 ;对 于 某 一 范围 内 的 所 有 站 点 ， 可 按 住 Shift 键 单 击 该 范围 的 第 一 个 站 
点 和 最 后 一 个 站 点 。 

(2) 单 击 【 导 出 】 按 钮 ， 在 依次 弹出 的 【导出 站 点 】 对 话 框 中 确认 保存 路 径 和 文件 名 ， 
单 击 【 保 存 】 按 钮 即 可 。 此 时 ，Dreamweaver 会 为 导出 的 每 一 个 站 点 生成 一 个 单独 的 .ste 文 
件 (站 点 定义 文件 )。 


局 订 洋 省 再 业 ste -记事 本 IE 
ET 
onl varsior "1. 0” encoding_ utF-a™ 3» _ 
site> 
localinFo ee “喜洋洋 酒 业 ” 
spacerfFilepathF”” refreshl 
ETP24 二 ace http: /fr xiyarey 
|=urserver= “appserver /> 
[remoteinfo accesstype="none”/> 
A Pe 
话 面 业 Vmain.asp”pagecperrow= “200”coltumnmidth= 125 
ALSEY shomhiddenfiles="FALSE”/? 


synci 
EN eco dnci ti voli nlec=" FA SE” 


Cdesignnotes uscd 


ilevi pcolums sharero onss 
Files” al 


show= “TRUE” sharc="FALSE” builtin="TRUE” localwidth="60” 


ALSE” builtin="TRUE” localwidth="-2” 
1” show=“TRIE” share="FALSE” builtin="TRUE” localwidth="60” 
E” builtin= "TRIS” lccalwidth="102” 


《colum pam aa olign- "left” showr"TRUE” sh: 
[renotemi dth="102” 
<colum Mame= ecked Out By” align="]eft” show=“FALSE” share=“FALSE” builtin=“TRIE” localwidth="-l 
[renotenl dth="-1” /> 
/fileviencol 
cappserverinto Tt cabhoet /come eto 
serverobiectsvers: ~” defeultdoctype="HIML” accesstype="lan” repoteroot="F: 各 衬 济 汀 业 /” 
[etreshr emot er TALSE” tsstsvrbinacsesstype=" nen 人 
eloaldng enabled ”TRUE ”patterne FALSE > 
《cloakedpattern pattern= 
<cloakedpattern patterm 
/cloaking) 
ontsibutorintogration enable LS 人 
/site> 


图 2.24 导出 的 站 点 定义 文件 
2.3.5 ”导入 站 点 


与 导出 站 点 相反 ,导入 站 点 是 将 指定 的 .ste 文 件 (站 点 定义 文件 ) 导 入 至 Dreamweaver 中 ， 
生成 一 个 新 的 站 点 。 

要 执行 站 点 导入 功能 ,可 在 如 图 2.10 所 示 的 【管理 站 点 】 对 话 框 中 单 击 【 导 入 】 按 钮 ， 
在 弹出 的 【导入 站 点 】 对 话 框 中 选择 要 导入 的 .ste 文件 ， 单 击 【 打 开 】 按 钮 即 可 。 


PeanutHula.7.1.1_Setup_PConine 


文 tm 谨 ffEtse 可 
六 位 类 型 加 5 [让 点 定义 文件 @. ste) | 


2.25 【导入 站 点 】 对 话 框 
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导入 站 点 后 ， 将 在 Dreamweaver 中 生成 一 个 新 的 站 点 ， 该 站 点 名 称 与 导出 该 站 点 定义 
文件 时 对 应 的 站 点 的 名 称 一 致 。 如 果 Dreamweaver 中 已 存在 该 名 称 的 站 点 ， 系 统 将 会 提示 
己 存 在 同名 站 点 ， 并 将 为 导入 的 站 点 重 命名 ， 如 图 2.26 所 示 。 
Pa JJ 


A 已 经 有 一 个 名 为 喜洋洋 酒 业 ?的 站 点 或 连接 。 导 入 的 站 点 被 重 命名 为 "喜洋洋 酒 业 0”。 


2.26 ”提示 站 点 重 名 


与 导出 站 点 一 样 ， 可 以 同时 导入 多 个 站 点 。 此 时 ， 只 需 在 【导入 站 点 】 对 话 框 中 ， 同 
时 选取 多 个 .ste 文件 ， 单 击 【打开 】 按 钮 即 可 。 


2.4 站 点 的 高 级 操作 


前 面 介绍 了 在 Dreamweaver 中 对 站 点 的 一 些 基 本 操作 ， 下 面 将 进一步 介绍 站 点 的 部 分 
高 级 操作 。 


2.4.1 管理 站 点 资源 


所 谓 站 点 资源 ， 是 指 站 点 中 所 存储 的 各 种 页 面 元 素 ， 包 括 图 像 、 影 片 、Flash、 声 音 、 
颜色 、 链 接 、 脚 本 等 。 这 些 资源 也 是 各 个 站 点 不 可 或 缺 的 。 随 着 站 点 的 一 步 步 开 发 ， 其 中 
所 积累 的 资源 将 会 越 来 越 多 。 此 时 ， 对 资源 进行 集中 管理 ， 己 是 一 件 非 常 必要 的 事情 。 在 
Dreamweaver 8 中 ,提供 了 对 站 点 资源 的 管理 功能 。 通过 管理 站 点 资源 ,可 以 轻松 地 跟踪 和 
预览 已 存储 在 站 点 中 的 所 有 资源 ， 也 可 以 将 其 中 某 种 资源 直接 拖 至 当前 打开 的 文档 中 ， 另 
外 ， 如 果 需 要 在 多 个 站 点 中 使 用 同一 资源 ， 也 可 将 其 复制 至 其 他 站 点 中 使 用 。 

1. 查看 资源 


可 以 通过 【资源 】 面板 来 查看 和 管理 当前 站 点 中 的 资源 。 【资源 】 面板 中 显示 了 与 【 文 
档 】 窗 口中 的 活动 文档 相关 联 的 所 有 站 点 资源 ， 如 图 2.27 所 示 。 

所 有 资源 是 通过 分 类 显示 的 ， 列 表 中 仅 能 显示 一 个 类 别 的 资源 。 在 【资源 】 面 板 的 左 
侧 ， 显 示 了 资源 的 相关 分 类 。 从 图 2.27 中 可 以 看 出 ， 在 Dreamweaver 8 中 ， 资 源 被 分 为 图 
像 、 颜色 、URLs( 链 接 )、Flash、Shockwave、 影 片 、 脚 本 、 模 板 和 库 等 九 大 类 ， 其 中 模板 
和 库 是 两 种 特殊 类 型 的 资源 (这 点 ， 将 会 在 后 面 进行 详细 介绍 )。 默 认 情 况 下 ，【 图 像 】 类 
别处 于 选 定 状态 。 通 过 单 击 不 同 的 类 别 按钮 ， 可 查看 该 类 别 的 相关 资源 。 

在 【资源 】 面 板 中 ， 提 供 了 【站 点 】 和 【收藏 】 两 种 视图 。【 站 点 】 视 图 显示 的 是 站 
点 的 所 有 资源 ， 而 【收藏 】 视 图 仅 显 示 用 户 明 确 选择 并 添加 至 收藏 中 的 资源 。 


提示 : 【站 点 】 视 图 和 【收藏 】 视 图 对 【模板 】 类 别 和 【 库 〗 类 别 无 效 。 当 查看 【模板 】 
或 【 库 〗 类 别 资源 时 ，【〖【 站 点 〗 和 【收藏 】 两 个 单 选 按 钮 不 可 用 。 
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图 2.27 查看 资源 

在 默认 情况 下 ， 所 显示 的 指定 类 别 的 资源 是 以 名 称 字 母 的 升序 进行 排列 。 通 过 单 击 不 
同 的 列 标题 ， 可 改变 资源 的 排序 方式 。 通 过 拖 动 两 个 列 标题 之 间 的 分 隔 线 ， 可 改变 前 一 列 
的 宽度 。 

当选 择 某 一 资源 ， 在 面板 顶部 的 预览 区 域 将 会 显示 该 资源 的 可 视 化 预览 。 

如 果 在 站 点 中 添加 或 删除 资源 时 ， 其 所 做 的 修改 不 会 立即 出 现在 【资源 】 面 板 中 ， 此 
时 可 通过 单 击 【 资 源 】 面 板 下 方 的 @ 按 钮 来 刷新 显示 。 但是， 如 果 对 资源 的 添加 和 删除 操 
作 是 在 Dreamweaver 外 部 进行 的 (如 通过 FrontPage 或 Visual Web Developer 2005 等 软件 添 
加 或 删除 站 点 中 的 资源 )， 则 必须 重新 生成 站 点 缓存 才能 更 新 【资源 】 面 板 。 


2. 使 用 资源 


资源 的 作用 在 于 使 用 ， 那 么 如 何 使 用 【资源 】 面 板 中 所 列 的 资源 呢 ? 一 般 来 说 ， 可 以 
将 大 多 数 类 型 的 资源 插入 到 当前 打开 的 文档 中 ， 而 模板 类 除外 (模板 仅 能 应 用 于 整个 文档 ， 
而 不 能 将 其 插入 到 文档 中 )。 对 于 颜色 和 URL， 还 可 将 其 应 用 于 【设计 】 视 图 中 所 选 定 的 
文本 。 
将 资源 插入 到 文档 中 的 方法 有 两 种 。 
e 在 当前 打开 文档 的 【设计 】 视 图 中 ， 将 插入 点 放置 在 资源 要 插入 的 位 置 ， 然 后 在 
【资源 】 面 板 中 选择 所 要 插入 的 资源 ， 并 将 其 拖 动 至 文档 的 插入 点 。 
e ”在 当前 打开 文档 的 【设计 】 视 图 中 ， 将 插入 点 放置 在 资源 要 插入 的 位 置 ， 然 后 在 
【资源 】 面 板 中 选择 所 要 插入 的 资源 ， 单 击 【 资 源 】 面 板 下 方 的 【插入 】 按 钮 (如 
果 是 【颜色 】 类 别 的 资源 ， 则 单 击 【应 用 】 按 钮 ) 即 可 。 
如 果 要 将 【颜色 】 或 URL 资源 应 用 于 选 定 的 文本 ， 其 方法 类 似 ， 只 是 首先 并 不 是 放置 
插入 点 ， 而 是 选择 要 应 用 资源 的 文本 ， 然 后 选择 资源 并 拖 动 或 单 击 【 插 入 】 按 钮 (对 于 【 颜 
色 】 资 源 ， 单 击 【应 用 】 按 钮 ) 即 可 。 
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3. 编辑 资源 


一 般 来 说 ， 对 于 除 脚 本 之 外 的 所 有 资源 ， 均 可 对 其 进行 编辑 。 其 类 别 不 同 ， 编 辑 的 方 
式 也 不 一 样 。 

对 于 图 像 、Flash、Shockwave、 影 片 等 类 别 的 资源 ， 通 过 双击 指定 资源 或 选取 资源 并 
单 击 区 按钮 ， 可 对 其 执行 编辑 操作 。 此 时 ，Dreamweaver 将 启用 与 该 资源 类 型 相关 联 的 外 
部 编辑 应 用 程序 来 对 其 进行 编辑 。 如 果 没 有 与 该 资源 类 型 相关 联 的 外 部 应 用 程序 ， 用 户 可 
在 【首选 参数 】 对 话 框 中 自行 设置 ， 具 体 方法 如 下 : 

(1) 选择 【编辑 】|【 首 选 参数 】 命 令 ， 在 弹出 的 【首选 参数 】 对 话 框 中 ， 选 择 【 文 件 
类 型 /编辑 器 】 类 别 ， 如 图 2.28 所 示 。 


分 类 文件 基 型 / 编辑 器 
[花草 在 民 码 祝 图 中 打开 jjs esa css cs cenfig inc tt os asc asr wb 


图 2.28 设置 外 部 编辑 器 


(2) 在 【扩展 名 】 列 表 中 ， 选 择 要 更 改 外 部 编辑 器 的 文件 类 型 ， 单 击 【外 部 代码 编辑 
器 】 文 本 框 右边 的 【浏览 】 按 钮 ， 在 弹出 的 【选择 外 部 编辑 器 】 对 话 框 中 选择 相应 的 应 用 
程序 即 可 。 

一 个 文件 类 型 可 同时 设置 多 个 外 部 编辑 器 。 通 过 单 击 【 设 为 主要 】 按 钮 ， 可 选 定 其 中 
的 一 个 作为 首选 编辑 器 。 

对 于 颜色 和 URL 类 型 的 资源 ， 只 能 在 【收藏 】 视 图 中 编辑 。 


查 近 范围 QD | 包 rrozw File "+* 自 宁国 - 


: 习 
| 可 执行 文件 e- exe) 本 


2.29 【选择 外 部 编辑 器 】 对 话 框 


。42 。 
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如 果 需 要 编辑 颜色 类 资源 ， 可 在 【收藏 】 视 图 中 选择 所 要 编辑 的 颜色 ， 然 后 双击 或 单 
击 左 按钮 ， 此 时 将 弹出 颜色 选择 器 ， 如 图 2.30 所 示 。 

在 颜色 选择 器 中 选取 更 改 后 的 颜色 ， 即 可 完成 对 指定 颜色 资源 的 编辑 。 

如 果 需 要 编辑 URL 类 资源 ， 可 在 【收藏 】 视 图 中 选择 所 要 编辑 的 URL 资源 ， 然 后 双 
击 或 单 击 刻 按钮 ， 此 时 将 弹出 【编辑 URL】 对话 框 ， 如 图 2.31 所 示 。 


代码 片断 
颜色 : 个 站 点 人 收藏 由 


Rs1 3 -oo4 


省 


CE | 
UL TT 
昵称 ; [bbs. webasp. net 取消 


[3 


图 2.30 ”编辑 颜色 类 资源 2.31 编辑 URL 类 资源 
在 URL 文本 框 中 ， 输 入 要 更 改 的 值 ， 单 击 【 确 定 】 按 钮 即 可 。 
4. 模板 和 库 


模板 和 库 是 Dreamweaver 中 两 种 特殊 类 型 的 资源 ， 它 们 是 一 种 链接 资源 ， 对 其 进行 编 
辑 将 更 新 已 应 用 这 些 资源 的 相关 文档 。 

模板 是 一 种 特殊 类 型 的 文档 , 用 于 设置 相对 固定 的 页 面 布局 。 可 以 基于 模板 创建 文档 ， 
从 而 使 创建 的 文档 继承 模板 的 页 面 布局 。 同 时 ， 在 设计 模板 时 ， 可 指定 在 基于 模板 的 文档 
中 用 户 可 以 编辑 文档 的 哪些 区 域 。 通 过 模板 ， 可 在 多 个 页 面 上 重复 使 用 同一 页 面 布局 。 而 
其 最 大 的 好 处 就 在 于 ， 当 更 新 模板 时 将 同时 更 改 应 用 该 模板 的 所 有 页 面 上 的 布局 。 
库 是 一 种 以 .lbi 为 扩展 名 的 特殊 的 Dreamweaver 文件 ， 它 用 于 存储 要 在 整个 站 点 中 经 
常 重复 使 用 或 更 新 的 资源 (如 站 点 的 版 权 信息 或 徽标 )， 这 些 资源 包括 图 像 、 表 格 、 声 音 
Flash 文件 等 。 库 里 存储 的 资源 又 称 为 库 项 目 。 每 当 更 改 库 项 目的 内 容 时 ， 将 同步 更 新 所 有 
使 用 该 项 目的 页 面 。 事实 上 ， 在 使 用 库 项 目 时 ，Dreamweaver 并 不 是 在 页 面 中 插入 库 项 目 ， 
而 是 插入 一 个 指向 库 项 目的 链接 ， 如 图 2.32 所 示 。 

从 图 2.32 中 可 以 看 出 ，Dreamweaver 向 页 面 中 插入 了 该 项 目的 HTML 源 代 码 副本 ， 同 
时 添加 了 一 个 包含 对 原始 外 部 项 目的 引用 的 HIML 注释 。 与 模板 相 比 ， 库 主要 用 于 个 别 的 
设计 元 素 ， 而 模板 则 用 于 控制 更 大 的 设计 区 域 。 

对 于 模板 和 库 的 各 项 具体 操作 ， 这 里 不 再 详细 叙述 ， 读 者 可 参考 相关 的 帮助 文档 。 
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< crn Languape="YB" ContentType=" text/htal” Respon ee ol neg="gb2312” 国 


%> 

<!4DDCTYPB html PUBLIC "-//¥3C//DTD XHTML 1.0 Transitional//EN" 

“http; {fwww, w3. orB/ TR/ xhtml1/DTD/xhtall—transitional, dt0"> 

<html xmlns="http: / /www, w3, org/1999/xhtal"> 

<head> 

《meta http-equiv="Content-Type” content=rtext/htal， charget=gb2312” /> 
《title> 无 标题 文档 < itle> 


< 一 #BeginLibraryltem “/Library/ 彰 景 , 1bi” 一 >Ciog 
src="Tile; 111P1/ 浏 阳 河 同 站 /总 详 洋酒 业 /imaBes/b8-rc8], jpg” width="573" 
height="402" alt=rrr" />¢!-— #EndLibraryltem 一 -> 


Chtal> 所 插入 的 库 项 目 


加 远道 


2.32 插入 库 项 目 


可 
站 | 
好 
这 
2 
友 国 < /hesa> 

全 
机 
3 
只 

区 


2.4.2 ”同步 站 点 文件 


如 果 站 点 设置 了 远程 服务 器 ， 那 么 在 创建 了 本 地 站 点 和 远程 站 点 之 后 ， 可 以 在 这 两 者 
之 间 实 现 文件 同步 。 为 确保 文件 安全 ， 可 在 同步 站 点 之 前 验证 要 将 哪些 文件 上 传 到 远程 服 
务 器 上 或 从 远程 服务 器 上 获取 哪些 文件 。 此 外 ， 在 同步 文件 之 后 ， 还 可 确认 对 哪些 文件 进 
行 更 新 。 

如 要 同步 站 点 文件 ， 其 操作 如 下 。 

(1) 选择 【站 点 】I【 同 步 站 点 范围 】 命令 ,系统 将 弹出 【同步 文件 】 对 话 框 ,如 图 2.33 
所 示 。 


BE 
用 上品 : | | | 
方向 0): | 区 轩 到 新 的 文件 得 。。 二] 取消 

玫 助 00 


厂 册 除 本 地 驱动 器 上 没有 的 远 请 文件 


图 2.33 【同步 文件 】 对 话 框 


在 【同步 】 下 拉 列 表 框 中 包括 两 个 选项 : 【整个 “喜洋洋 酒 业 ” 站 点 】( 注 意 ， 喜 洋洋 
酒 业 为 站 点 名 称 ) 和 【 仅 选 中 的 远 端 文件 】。 前 者 是 同步 整个 站 点 的 所 有 文件 ， 而 后 者 是 同 
步 在 【文件 】 面 板 的 【远程 】 视 图 中 所 选择 的 文件 。 在 【方向 】 下 拉 列 表 框 中 提供 了 3 个 
选项 : 【放置 较 新 的 文件 到 远程 】、【 从 远程 获得 较 新 的 文件 】 和 【获得 和 放置 较 新 的 文 


件 】。 
@ 【放置 较 新 的 文件 到 远程 】: 将 上 传 远 端 服务 器 上 不 存在 的 或 自从 上 次 上 传 以 来 
已 更 改 的 所 有 本 地 文件 。 
@ 【从 远程 获得 较 新 的 文件 】: 将 获取 本 地 不 存在 的 或 自从 上 次 获取 以 来 已 更 改 的 
所 有 远 端 文件 。 


@ 【获得 和 放置 较 新 的 文件 】: 将 所 有 文件 的 最 新 版 本 更 新 至 本 地 和 远 端 站 点 上 。 
(2) 单 击 【 预 览 】 按 钮 ， 此 时 Dreamweaver 将 根据 用 户 在 【同步 】 和 【方向 】 下 拉 列 
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表 框 中 的 选择 ， 检 测 本 地 和 远 端 站 点 上 文件 的 较 新 版 本 ， 如 图 2.34 所 示 。 在 检测 完成 后 ， 
Dreamweaver 将 在 【同步 】 对 话 框 中 显示 检测 的 结果 ， 如 图 2.35 所 示 。 


名 后 台 文件 活动 -喜洋洋 酒 业 


正在 检查 exe. gif 是 否 较 新 。 
SS DSS] 


各 存 记 如 | | 隐 寻 取消 


图 2.34 检测 较 新 文件 


国 源 图 \be_eexs.psd 
源 图 \ 公 司 理 售 .psd 


要 更 疏 动作， 请 选择 文件 并 单 击 下方 的 其 中 一 个 图 标 ， 然 后 单 击 “ 确 定 ”。 


eal Cw | | ww | 


图 2.35 【同步 】 对 话 框 


(3) 如 果 想 在 此 次 同步 操作 中 忽略 某 个 文件 ， 可 选择 该 文件 ， 单 击 薛 按钮 。 在 确认 
所 有 列 出 来 的 要 上 传 或 获取 的 文件 之 后 ， 单 击 【确定 】 按 钮 ， 即 可 执行 同步 文件 操作 。 


2.4.3 ”检查 站 点 链接 


检查 站 点 链接 功能 可 帮助 我 们 在 整个 站 点 中 检查 断 掉 的 链接 、 外 部 链接 以 及 孤立 文件 。 
在 这 里 ， 断 掉 的 链接 是 指 链接 文件 在 本 地 磁盘 中 没有 找到 ， 外 部 链接 是 指 链接 到 站 点 外 面 
的 链接 ， 孤 立 文件 是 指 未 被 链接 或 引用 的 文件 。 

如 要 检查 站 点 链接 ， 可 选择 【站 点 】| 【检查 站 点 范围 的 链接 】 命 令 ， 系 统 将 对 所 有 和 链 
接 进 行 检查 ， 并 将 检查 结果 显示 在 【结果 】 面 板 组 中 的 【链接 检查 器 】 面 板 中 ， 如 图 2.36 
所 示 。 


下 结果 “搜索 | 参考 | 验证 | 目标 浏览 器 检查 ”链接 检查 器 
星 示 (8): | 断 拉 的 链接 了 ] (链接 文件 在 本 地 磁盘 没有 找到 ) 
区 


© 国 /article asp #default#honepage 
国 /en asp #defaul t#honepage 
国 /entp asp #defanult#honepage 
J emew_mx. asp #defaul t#honepage 
国 /epbl .asp #defaul t#honepage 


图 2.36 ”链接 检查 结果 
默认 情况 下 ， 在 【链接 检查 器 】 面 板 中 显示 的 是 断 掉 的 链接 。 从 【显示 】 下 拉 列 表 框 


中 选择 【外 部 链接 】 选 项 或 【孤立 文件 】 选项 ， 可 分 别 查 看 相应 类 别 的 检查 结果 ， 如 图 2.37 
和 图 2.38 所 示 。 
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Bb. 
© 
回 | 为 /artiae as javasceript:window, external .AddFavoritef http. 
国 /article asp http://download nacromedia com/pub/shockrave 
国 /en asp javascript 
国 /en. as javascript: window. external. AddFavorite( http 
vo 


/rn sn httn /a arr me 
总 共 878 个 ， 203 个 HTWL ， 512 个 孤立 文件 。 ”总共 1725 个 链接 ,1556 个 正确 ,42 


2.37 ”检查 结果 一 一 外 部 链接 
链接 检查 器 站 点 报告 | FTp 记 录 | 服务 器 调 芭 。 所 


国 /_eompareTenpyTHPd267b4Tkfj.htm 
国 /_compareTenp/TIPd2p9i4Tkes6 .htm 


BY 1aanin/aHwPicfvmr ern nne 
总 共 878 个 ，203 个 HTWL ， 512 个 孤立 文件 。 总 共 1725 个 链接 ,1556 个 正确 , 42 


图 2.38 检查 结果 一 一 孤立 文件 

单 击 苞 按钮， 可 重新 检查 链接 ， 其 可 选 操作 包括 3 种 : 检查 当前 文档 中 的 链接 、 检 查 
当前 整个 本 地 站 点 的 链接 和 检查 站 点 中 所 选 文 件 的 链接 。 单 击 园 按钮 ， 可 将 当前 检查 结果 
保存 为 文本 文件 。 

除了 检查 站 点 链接 外 ， 还 可 检查 当前 文档 的 链接 和 检查 指定 文件 /文件 夹 的 链接 。 对 于 
前 者 ， 可 选择 【文件 】|【 检 查 页 】|【 检 查 链 接 】 命 令 ， 对 于 后 者 ， 可 在 【文件 】 面 板 中 
选择 要 检查 链接 的 文件 或 文件 夹 ， 然 后 右 击 ， 在 弹出 的 快捷 菜单 中 选择 【检查 链接 】|【 选 
择 文件 /文件 夹 】 命 令 。 

通过 检查 链接 ， 可 检查 链接 的 有 效 性 和 完整 性 。 


2.4.4 ”站 点 报告 
在 Dreamweaver 中 , 可 对 当前 文档 、 选 定 文件 或 整个 站 点 的 工作 流程 及 HIML 属性 ( 包 


括 辅助 功能 ) 运 行 站 点 报告 。 
选择 【站 点 】| 【报告 】 命 令 ， 此 时 将 弹出 【报告 】 对 话 框 ， 如 图 2.39 所 示 。 
EE 
ET | 
| 


最 近 | 
报 
2 
D4 
| 
三。 多余 的 谋 套 标 答 
可 
日 


帮助 


| 
四 


图 2.39 【报告 】 对 话 框 
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在 【报告 在 】 下 拉 列 表 框 中 ， 可 选择 运行 报告 的 范围 ， 其 选项 包括 【当前 文档 】、【 整 
个 当前 本 地 站 点 】、【 站 点 中 的 已 选 文件 】 以 及 【文件 夹 】 等 。 

在 报告 类 型 中 ， 分 为 了 两 大 类 : 【工作 流程 】 和 【HTML 报告 】。 

工作 流程 报告 可 以 帮助 用 户 改进 站 点 设计 小 组 中 各 成 员 之 间 的 协作 ， 其 内 容 包括 【 取 
出 者 】、【 设 计 备注 】、【 最 近 修 改 的 项 目 】。 其 中 ，【 取 出 者 】 将 会 列 出 谁 取 出 了 哪些 
文件 , 【设计 备注 】 将 会 列 出 哪些 文件 具有 与 之 关联 的 设计 备注 信息 ,， 【最 近 修 改 的 项 目 】 
将 会 列 出 最 近 修 改 了 哪些 文件 。 选 择 其 中 一 项 ， 单 击 【报告 设置 】 按 钮 ， 可 对 其 进行 更 为 
详细 的 过 滤 设 置 。 图 2.40 所 示 的 图 即 为 【最 近 修 改 的 项 目 】 一 项 的 过 滤 设置 对 话 框 。 


Er > 
6 全 于 个 必 文件 于 量 近 ; 
让 一 天 Ri | 
在 此 其 和 隆 卫 修改 的 文件 - 和 
Fe 4 a de 
至 : [zo05 ~ 年 -1 有 ls 了 本 日 
人 六 痢 : 厂 一 一 一 一 一 
网 于 “ 仅 Contribute 站 点 ”) 


上 革 i 您 希 户 在 哪里 
人 ”本 地 计算 机 (用 于 查看 逢 意 页 面 ) 


个 ”测试 服务 器 用 于 查看 动态 页 面 ) 
| Try 


图 2.40 【最 近 修改 的 项 目 】 对 话 框 
提示 : 只 有 在 定义 远程 端点 后 ， 才 能 运行 工作 流程 报告 。 


HTML 报告 可 帮助 我 们 对 多 个 HTML 属性 编辑 和 生成 报告 , 它 还 可 以 帮助 用 户 检查 可 
合并 骨 套 字体 标签 、 辅 助 功能 、 没 有 蔡 换 文本 、 多 余 的 嵌 套 标签 、 可 移 除 的 空 标签 以 及 无 
标题 文档 等 。 

【可 合并 堪 套 字体 标签 】: 列 出 所 有 可 以 为 清理 代码 而 合并 的 嵌 套 字体 标签 。 
【辅助 功能 】: 列 出 文档 的 内 容 与 内 置 的 辅助 功能 准则 之 间 的 冲突 。 
【没有 蔡 换文 本 】: 列 出 所 有 没有 设置 蔡 换文 本 的 img 标签 。 

【多 余 的 堪 套 标签 】: 列 出 见 余 的 可 清理 的 嵌 套 标签 。 

【可 移 除 的 空 标签 】: 列 出 可 移 除 的 空 标签 。 

@ 【无 标题 文档 】: 列 出 所 有 无 标题 的 文档 。 

在 HIML 报告 中 ， 可 对 【辅助 功能 】 一 项 进行 详细 的 报告 设置 ， 如 图 2.41 所 示 。 

在 【报告 】 对 话 框 中 ， 选 择 所 要 运行 的 报告 类 别 ， 单 击 【运行 】 按 钮 ， 系 统 即 可 对 报 
告 范围 内 的 所 有 文件 进行 检测 ， 并 生成 报告 信息 ， 显 示 在 【结果 】 面 板 组 中 的 【站 点 报告 】 
面板 中 。 图 2.42 和 图 2.43 显示 的 分 别 为 工作 流程 报告 和 HIML 报告 的 结果 。 

在 运行 完 报告 后 ， 单 击 园 按 钮 ， 可 将 报告 保存 为 XML 文件 供 日 后 参考 。 
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本 AL 全 部 
国 508 ccessibility 全 部 
国 3CAWCAG 了 1 accessibility 全 部 
VAC/WCNG P 2 accessibility 全 部 

全 部 


2.41 【辅助 功能 】 对 话 框 
让 报告 “FTP 记 好 | 服务 器 调式 二 


修改 日 期 = 8/19/2006 
修改 日 期 = 8/19/2006 
修改 日 期 = 8/19/2006 
修改 日 其 = 8/19/2008 


司 Library\ 背 景 lbi 


图 2.42 工作 流程 报告 


> 
|x 
| x etice sp Hon spacer ING with valid ALT [S508 MWCAG 1.1 Pl] 一 -lo 所 
BX wtidessp 47 hon spreer ING vith valid ALT [S509 WWCAG 1.1 Pl] 一 已 失败 一 Wo 人 L 
X wticle nsp 48 -Jon spscer ING with valid ALT [S506 WWCAG 1.1 Pl] 一 已 失败 一 Jo 人 L 
X ticle ssp 49 lon spscer ING with valid ALT [S508 WWCAG 1.1 PI] 一 已 失败 一 No 人 L 
X wticle ssp 50 。 Jon spscer ING with valid ALT [S506 WWCAG 1.1 Pl] 一 已 失败 一 Jo 人 L 
X article ssp 51 Hon specer ING vith valid ALT [S508 W/WCAG 1.1 P1] 一 已 失败 一 ye 人 L ,， 到 | 
元 成 。 完成 


图 2.43 HTML 报告 
2.5 习 题 


(1) 了 解 新 建站 点 的 整个 过 程 ， 重 点 掌握 站 点 设置 中 本 地 信息 、 远 程 信息 和 测试 服务 
器 等 三 项 信息 的 具体 设置 ， 以 及 其 中 各 个 选项 的 含义 。 

(2) 掌握 站 点 管理 中 ， 对 站 点 文件 的 有 效 链接 和 失效 链接 的 检测 。 

(3) 掌握 本 地 站 点 与 远程 站 点 之 间 的 文件 传递 操作 ， 包 括 获 取 、 取 出 、 上 传 、 存 回 等 
相关 操作 。 
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通过 前 面 章 节 的 学 习 ， 读 者 对 Dreamweaver 8 已 经 有 了 一 个 初步 的 认识 。 在 本 章 中 ， 
将 介绍 Dreamweaver 8 中 一 些 基本 元 素 的 相关 操作 ， 包 括 文本 、 图 像 、 链 接 的 处 理 以 及 表 
格 的 具体 使 用 。 在 最 后 的 典型 实例 中 ， 将 通过 一 个 博客 首页 面 的 制作 来 帮助 大 家 了 解 各 种 
元 素 的 综合 应 用 


3.1 添加 文本 


文本 是 网 页 的 一 个 最 基本 的 组 成 部 分 ， 也 是 网 页 中 表达 信息 的 一 个 主要 途径 。 对 文本 
的 处 理 是 网 页 设计 中 的 一 个 最 简单 、 最 基础 的 操作 。 
在 ASPNET 页 面 中 , 文本 可 分 为 静态 文本 和 动态 文本 。 静 态 文本 是 指 直接 在 页 面 中 输 
入 的 文本 ， 其 浏览 时 与 输入 时 一 致 ， 动 态 文本 是 指 通过 表达 式 或 函数 所 返回 的 文本 ， 或 是 
与 指定 的 数据 源 中 的 字段 绑 定 在 一 起 的 文本 。 动 态 文本 的 输出 显示 是 不 确定 的 ， 而 是 动态 
改变 的 。 本 节 主 要 介绍 静态 文本 的 相关 操作 , 动态 文本 的 处 理 与 静态 文本 的 处 理 是 一 样 的 。 


3.1.1 设置 文本 格式 


在 Dreamweaver 8 中 ， 对 文本 格式 的 设置 主要 是 通过 【属性 】 面 板 来 实现 的 。 在 页 面 
中 ,选择 需要 设置 格式 的 文本 ,在 【属性 】 面板 中 即 可 显示 相应 的 格式 项 目 ， 如 图 3.1 所 示 。 


iv 属性 EE 
格式 无 辐 柚 [ 无 司 CESBZx 和 主公 和 旺 链接 | gob 8 
字体 | 默认 字体 加 | 大 小 无 “部 品 广 汪 线 经 目标 


3.1 【属性 】 面 板 

1. 字体 

当 在 Dreamweaver 8 的 编辑 区 中 输入 文本 时 ， 系 统 将 默认 的 字体 (宋体 ) 应 用 到 文本 中 。 
如 果 需 要 更 改 文 本 使 用 的 字体 ， 则 可 先 选择 文本 ， 然 后 在 【属性 】 面 板 中 单 击 【 字 体 】 下 
拉 列 表 框 ， 此 时 将 弹出 【字体 】 下 拉 列 表 ， 如 图 3.2 所 示 。 

在 该 下 拉 列 表 中 ， 显 示 了 Dreamweaver 8 中 默认 提供 的 常用 字体 列表 ， 而 其 中 大 部 分 

英文 字体 。 选 择 【 字 体 】 下 拉 列 表 中 的 【编辑 字体 列表 】 选 项 ， 将 弹出 【编辑 字体 列表 】 

对 话 框 ， 如 图 3.3 所 示 。 
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ial, Helvetica, sans-serif 
Geneva, Arial, Helvetica, sans-serif 


3.2 【字体 】 下 拉 列 表 


图 3.3 【编辑 字体 列表 】 对 话 框 


在 【可 用 字体 】 列 表 框 中 ， 显 示 了 当前 操作 系统 中 安装 的 所 有 字体 。 如 果 需 要 将 其 中 
的 字体 添加 至 【字体 列表 】 列 表 框 中 ， 可 选择 该 字体 ， 然 后 单 击 弘 按钮 ， 将 其 添加 至 【 选 
择 的 字体 】 列 表 框 中 ， 同 时 将 其 添加 至 【字体 列表 】 中 ， 如果 需要 将 指定 的 字体 从 【选择 
的 字体 】 列 表 框 中 删除 ,可 先 在 【选择 的 字体 】 列 表 框 中 选择 该 字体 ， 然 后 单 击 六 按钮 即 可 。 

单 击 【 字 体 列表 】 列 表 框 左 侧 的 [二 按钮， 可 以 再 次 在 【字体 列表 】 列 表 框 中 添加 新 的 
字体 ;而 单 击 司 按 钮 ， 则 可 以 在 字体 列表 中 删除 所 选择 的 字体 。 单 击 【 字 体 列 表 】 列 表 框 
右 侧 的 蕊 按钮 ， 可 以 将 所 选择 的 字体 在 字体 列表 中 上 移 一 个 位 置 ; 而 单 击 [了 ] 按 钮 ， 则 可 以 
将 所 选择 的 字体 在 字体 列表 中 下 移 一 个 位 置 。 

单 击 【 确 定 】 按 钮 ， 即 可 完成 字体 列表 的 编辑 设置 。 


提示 : 在 页 面 设计 中 ， 应 尽 可 能 少 地 使 用 不 常见 的 字体 。 因 为 ， 如 果 客 户 端 没有 安装 当前 
页 面 所 设置 的 字体 ， 则 将 以 默认 的 字体 进行 显示 ， 从 而 失去 了 字体 设置 的 意义 。 


2. 大 水 


在 页 面 设计 中 ， 常 常 需要 根据 情况 设置 文本 的 列表 大 小 。 在 Dreamweaver 8 中 ， 对 文 
本 大 小 的 设置 是 通过 【属性 】 面 板 中 的 【大 小 】 下 拉 列 表 框 来 实现 的 ， 如 图 3.4 所 示 。 

在 【大 小 】 下 拉 列 表 框 中 ， 提 供 了 两 种 类 型 的 文字 大 小 设置 : 绝对 大 小 和 相对 大 小 。 
绝对 大 小 是 指 固定 的 文字 大 小 ， 图 3.4 所 表示 的 数字 即 为 文字 的 绝对 大 小 ， 其 中 数字 越 小 
相应 的 文字 就 越 小 ， 而 相对 大 小 则 是 指 相对 于 页 面 默 认 文字 大 小 的 比较 。 在 默认 情况 下 ， 
页 面 的 基准 字号 为 3， 可 以 通过 页 面 的 <BaseFont> 标 签 来 改变 默认 的 文字 大 小 。 一 般 来 说 ， 
文字 的 绝对 大 小 使 用 更 为 频繁 。 当 选择 了 文字 的 绝对 大 小 后 ， 在 其 后 面 的 下 拉 列 表 框 中 ， 
将 会 显示 所 使 用 的 字号 单位 , 如 图 3.5 所 示 。 默认 情况 下 , 所 使 用 的 字号 单位 为 “像素 ”(px)， 
用 户 也 可 根据 需要 选择 其 他 的 字号 单位 。 
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3.4 【大 小 】 下 拉 列 表 3.5 ”字号 单位 


提示 : 在 【大 小 】〗 下 拉 列 表 框 中 ， 用 户 可 直接 输入 数字 来 设置 文字 的 绝对 大 小 。 比 如 ， 在 
【大 小 】 下 拉 列 表 框 中 不 能 选择 13 作为 字号 ， 但 可 以 直接 在 下 拉 列 表 框 中 输入 数 
字 13。 
3. 颜色 
一 般 来 说 , 页 面 背景 设 为 白色 和 文字 设 为 黑色 。 如 果 
需要 获取 其 他 的 效果 ， 则 可 对 文字 的 颜色 进行 设置 。 画 
选择 要 设置 颜色 的 文本 ， 单 击 【 属 性 】 面 板 中 的 【 文 
本 颜色 】 按 钮 二 =|， 即 可 弹出 【立方 色 】 调 色 板 ， 如 图 3.6 
所 示 。 
当 将 鼠标 移动 到 相应 的 色 块 上 时 , 鼠标 指针 将 变 成 吸 
管 形状 , 同时 在 调 色 板 的 上 方 显示 当前 颜色 所 对 应 的 十 六 
进 制 值 。 单 击 ， 即 可 选择 该 颜色 。 
单 击 调 色 板 中 的 【默认 颜色 】 按 钮 回 ， 可 清除 所 选 
择 的 颜色 ， 恢 复 成 默认 的 颜色 。 
单 击 调 色 板 中 的 【系统 颜色 拾取 器 】 按 钮 图 ， 则 可 弹出 如 图 3.7 所 示 的 【颜色 】 对 
话 框 。 


图 3.6 【立方 色 】 调 色 板 


加 mm 
天 画面 面 面 面 面 面 
加 加 加 本 


自 定义 颜色 化); 
mms sms mm 
msm ms mm 


色调 :160 红 G): |51 | 
馆 和 度 G); 0 ”| 绿 @): 51 | 


颜色 | 纯色 QQ) 亮度 中: 48 蓝 QD; 51 


Lj][ 了 ] [ 系 加 到 目 定 又 闫 色 4 


图 3.7 【颜色 】 对 话 框 
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在 此 对 话 框 中 ， 除 了 可 以 选择 系统 的 基本 颜色 外 ， 还 可 以 自 定义 颜色 。 用 户 可 以 在 右 
侧 的 色 域 面板 中 选择 自 定义 的 颜色 ， 并 通过 亮度 滑 块 调 节 自 定义 颜色 的 亮度 值 。 单 击 【 添 
加 到 自 定义 颜色 】 按 钮 ， 可 将 当前 所 设置 的 自 定义 颜色 添加 到 左 侧 的 【 自 定义 颜色 】 区 域 
的 颜色 框 中 。 单 击 【 确 定 】 按 钮 ， 就 完成 了 自 定义 颜色 的 添加 。 
除了 以 上 可 选择 的 颜色 外 ,Dreamweaver 还 通过 其 他 的 颜 


色 类 型 为 用 户 提供 了 更 多 的 颜色 选择 。 单 击 调 色 板 中 的 ? 按 反 

钮 ， 可 打开 调 色 板 选 择 菜单 ， 如 图 3.8 所 示 。 A 
其 中 ,提供 了 更 多 类 型 的 调 色 板 ， 除 了 默认 【立方 色 】 调 | xs 

色 板 外 ， 还 包括 【连续 色调 】、【Window 系统 】、【Mac 系 1 _ 调 网 全 包 


统 】、【 灰 度 等 级 】 等 调 色 板 。 在 图 3.9~ 图 3.12 中 ， 显 示 了 图 38 调 色 板 选择 某 音 
以 上 类型 调 色 板 分 别 对 应 的 可 选 颜 色 样式 。 


[Te wr 


图 3.9 【连续 色调 】 调 色 板 图 3.10 【Window 系统 】 调 色 板 


网 [CE] rrrrr 


3.11 【Mac 系统 】 调 色 板 图 3.12 【 灰 度 等 级 】 调 色 板 
除了 通过 调 色 板 来 选择 颜色 外 ， 还 有 一 种 更 直接 的 _ 

办 法 , 那 就 是 在 -| 按钮 后 的 文本 框 中 直接 输入 颜色 所 对 et 
应 的 十 六 进 制 数 值 。 Ti 四 
册 除 线 (5) 
4. 文本 样式 a 
在 文本 格式 的 设置 中 , 除了 以 上 提 到 的 字体 、 大 小 、 ee 
颜色 外 ， 还 可 设置 文本 的 其 他 样式 属性 ， 如 加 粗 、 斜 体 、 站 
下 划 线 、 删 除 线 等 。 除 了 最 常用 的 加 粗 、 斜 体 样式 可 直 全 
接 在 【属性 】 面板 中 通过 单 击 相应 的 按钮 (B 和 | 了 ) 实 现 mv 
外 ， 其 余 样式 均 可 通过 【文本 】| 【样式 】 子 菜单 中 的 命 Ba 


令 来 实现 ， 如 图 3.13 所 示 。 
其 中 ， 各 个 命令 的 含义 及 所 对 应 的 <HTML> 标 记 见 ”图 3.13 【样式 】 子 菜单 中 的 命令 
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表 3.1 
表 3.1 【样式 】 子 菜单 中 的 命令 及 功能 
样 式 功 能 对 应 的 <HTML> 标 记 
粗 体 将 选中 的 文本 加 粗 显 示 <b></b> 
斜体 将 选中 的 文本 变 斜 <i></i> 
下 划 线 为 选中 的 文本 添加 下 划 线 <u></u> 
删除 线 为 选中 的 文本 添加 删除 线 <s></s> 
打字 型 为 选中 的 文本 添加 等 宽 标 记 <tt></tt> 
强调 为 选中 的 文本 使 用 斜体 着 重 强调 <em></em> 
加 强 为 选中 的 文本 使 用 黑体 着 重 强调 <strong></strong> 
代码 为 选中 的 文本 使 用 描述 程序 代码 效果 <code></code> 
变量 为 选中 的 文本 使 用 动态 字体 <var></var> 
范例 为 选中 的 文本 使 用 标准 字体 <samp></samp> 
键盘 为 选中 的 文本 使 用 黑体 <kbd></kbd> 
引用 为 选中 的 文本 使 用 斜体 <cite></cite> 
定义 为 选中 的 文本 使 用 斜体 <dfn></dfn> 
已 删除 为 选中 的 文本 添加 删除 线 <del></del> 
已 插入 为 选中 的 文本 添加 下 划 线 <ins></ins> 


3.1.2 ”设置 段落 


段落 是 排列 文本 时 最 常用 的 格式 之 一 ， 通 常情 况 下 ， 页 面 中 的 大 量 文本 都 是 由 段落 组 
成 的 。 在 HTML 中 ， 开 始 标记 <P> 和 结束 标记 </P> 之 间 的 文本 被 标识 为 一 个 段落 。 对 于 段 
落 的 创建 ， 只 需 在 分 段 的 地 方 按 Enter 键 即 可 。 

对 于 段落 的 格式 ， 主 要 包括 对 齐 设 置 、 缩 进 / 凸 出 设置 以 及 标题 设置 等 几 个 方面 。 

1. 段落 对 齐 

在 [属性] 面板 中 , 提供 了 4 种 段落 文本 的 对 齐 方式 : 三 ( 左 对 齐 )、 生 (居中 对 齐 )、 壹 ( 右 
对 齐 ) 和 恒 ( 两 端 对 齐 )。 其 中 ， 左 对 齐 是 指 将 段落 内 的 所 有 文本 行 靠 左 对 齐 ， 居 中 对 齐 是 指 
将 段落 内 的 所 有 文本 行 居 中 对 齐 ， 右 对 齐 是 指 将 段落 内 的 所 有 文本 靠 右 对 齐 ， 两 端 对 齐 则 
是 指 将 段落 内 的 所 有 文本 行 尽量 向 两 端 对 齐 。 各 种 对 齐 方式 的 效果 如 图 3.14 所 示 。 


| 用 Dreanweaver eh 您 可 以 快速 创建 Web 页 面 而 无 需 编 写 任何 代码 。 您 可 以 查看 所 有 | 
让 点 元 素 或 资源 并 将 它们 从 易于 使 用 的 面板 直接 拖 到 文档 中 。 左 对 齐 
利用 Dreamweaver 中 的 可 视 化 编辑 功能 ， 您 可 以 快速 创建 Web 页 面 而 无 需 编写 任何 代码 。 汪汪 和 所 和 | 
站 点 元 素 或 资源 并 将 它们 从 易于 使 用 的 面板 直接 拖 到 文档 中 。 居中 对 齐 
[ Dreamweaver 中 的 可 视 化 编辑 功能 ， 您 可 以 快速 创建 和 您 可 以 查看 所 : 
右 对 齐 站 点 元 素 或 资源 并 将 它们 从 易于 使 用 的 面板 直接 拖 到 文档 中 。 
的 可 视 化 编辑 功能 ， 您 可 以 快速 创建 


人 Dreanveaver 


ver 中 快速 创建 ”Web 页 面 而 无 需 编写 任何 代码 。 礼 可 以 查看 所 有 | 
站 点 元 素 或 资源 并 将 它们 从 易于 使 用 的 面板 直接 拖 到 文档 中 。 两 蝙 对 齐 


3.14 ”文本 对 齐 效 果 
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2. 段落 缩 进 / 凸 出 

段落 的 缩 进 是 指 缩 进 页 面 两 侧 的 文本 ， 而 凸 出 则 与 缩 进 相反 ， 用 于 取消 段落 的 缩 进 操 
作 。 对 于 一 个 段落 ,可 执行 多 重 缩 进 ,在 <HTMIL> 中 , 缩 进 操作 所 对 应 的 标签 为 <blockquote>。 
在 【属性 】 面 板 中 ， 单 击 瞧 按钮 ， 可 执行 段落 的 缩 进 操作 ， 单 击 鞋 按钮， 可 执行 段落 的 
凸 出 操作 。 在 图 3.15 中 ， 显 示 了 段落 缩 进 与 未 缩 进 的 效果 对 比 。 


利用 Dreanweaver 中 的 人 您 
站 全 和 人 让 您 可 以 查看 所 有 站 点 元 素 或 


可 以 快速 创建 灿 
资源 并 将 它们 从 
接 拖 到 文档 中 。 


Wee 
的 段落 


狗 ， Dreamweaver 中 的 可 视 化 编辑 功 4 创建 您 可 以 查看 


有 站 点 元 素 或 资源 并 将 它们 从 易于 面 析 直接 拖 到 文档 中 。 


图 3.15 段落 的 缩 进 


3. 设置 标题 

为 了 便于 将 页 面 中 的 文本 进行 分 级 分 类 , 在 Dreamweaver 中 提 
供 了 为 文本 设置 标题 的 功能 ， 这 样 便于 用 户 了 解 文本 的 层次 结构 。 
在 Dreamweaver 8 中 , 选择 要 设置 为 标题 的 文本 , 然后 单 击 【 属 
性 】 面板 中 【格式 】 下 拉 列 表 框 ， 此 时 将 会 显示 如 图 3.16 所 示 的 下 ”图 3.16 【格式 】 下 拉 
拉 列 表 。 列表 

这 里 ,提供 了 6 种 预定 义 的 标题 选项 , 其 名 称 分 别 为 “标题 1 ”~ 
“标题 6”( 由 高 到 低 的 级 别 顺序 )。 对 应 的 显示 效果 ， 如 图 3.17 所 示 。 


Dreamweaver 8 与 ASP. NET 
Dreamweaver 8 与 ASP. NET 


Dreamweaver 8 与 ASP. NET 


Dreanveaver 8 与 ASP. NET 


Dreanveaver 8 与 ASP. NET 


3.17 ”标题 列表 


在 图 中 ， 第 1 行 一 第 6 行 ， 依 次 对 应 于 “标题 1” 一 “标题 6”。 虽 然 ， 标 题 的 格式 是 
默认 的 ， 但 并 不 是 固定 的 。 在 将 文本 设置 为 标题 之 后 ， 用 户 可 以 再 对 该 标题 的 文本 格式 进 
行 设置 ， 包 括 字 体 类 型 、 大 小 、 颜 色 以 及 加 粗 、 和 斜体 等 相关 样式 的 设置 。 


3.1.3 ”设置 列表 


在 Dreamweaver 8 中 ， 可 以 创建 3 种 形式 的 列表 : 项 目 列表 、 编 号 列表 和 定义 列表 。 
项 目 列表 又 叫 无 序列 表 ， 它 将 所 要 列举 的 项 目 一 一 列 出 ， 而 不 进行 任何 编号 ， 编 号 列 
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表 ， 又 叫 有 序列 表 ， 它 是 将 所 要 列举 的 项 目 按 顺 序 进行 排列 ， 并 依次 进行 编号 ; 定义 列表 
则 用 于 对 文本 中 的 某 一 个 词 或 某 一 段 文字 进行 解释 ， 显 示 该 词 或 文字 的 说 明 信 息 。 在 
Dreamweaver 8 的 【属性 】 面 板 中 ， 提 供 了 对 项 目 列表 和 编号 列表 的 快捷 操作 按钮 。 
选择 需要 创建 列表 项 的 文本 ， 单 击 【 属 性 】 面 板 中 的 汪 按 钮 ， 即 可 创建 一 个 项 目 列表 ， 
如 图 3.18 所 示 。 

在 项 目 列表 的 文本 之 后 ， 按 Enter 键 ， 可 生成 一 行 新 的 项 目 列表 项 ; 如果 在 项 目 列表 
的 文本 之 后 按 两 次 Enter 键 ， 则 可 结束 当前 的 项 目 列表 。 在 默认 情况 下 ， 项 目 列表 的 项 目 
符号 将 采用 黑色 实心 圆 点 ， 也 可 更 改 默 认 的 项 目 符号 。 

将 光标 置 于 项 目 列表 的 文本 中 ， 单 击 【 属 性 】 面 板 中 的 【列表 项 目 】 按 钮 ， 此 时 将 弹 
出 【列表 属性 】 对 话 框 ， 如 图 3.19 所 示 。 


图 3.18 项 目 列表 3.19 【列表 属性 】 对 话 框 


在 【列表 类 型 】 下 拉 列 表 框 中 ， 提 供 了 两 种 符号 类 型 选项 : 项 目 符号 和 正方 形 。 项 目 
符号 即 系统 默认 的 黑色 实心 圆 点 ， 正 方形 则 表示 黑色 实心 方块 ， 用 户 可 根据 需要 来 选择 。 

在 页 面 上 选择 需要 创建 列表 项 的 文本 ， 单 击 【 属 性 】 面 板 中 的 反 按钮 ， 即 可 创建 一 个 
编号 列表 ， 如 图 3.20 所 示 。 

默认 情况 下 ， 编 号 列表 的 项 目 符号 将 采用 数字 。 与 项 目 列表 类 似 ， 同 样 可 更 改 默认 的 
项 目 符号 。 将 光标 置 于 编号 列表 的 文本 中 ， 单 击 【 属 性 】 面 板 中 的 【列表 项 目 】 按 钮 ， 此 
时 将 弹出 【列表 属性 】 对 话 框 ， 如 图 3.21 所 示 。 


二 列表 项 目 1 
3 列表 项 目 3 


,列表 项 目 4 


3.20 ”编号 列表 图 3.21 【列表 属性 】 对 话 框 


在 【样式 】 下 拉 列 表 框 中 ， 提 供 了 5 种 列表 的 符号 样式 ， 它 们 分 别 是 数字 、 小 写 罗马 
字符 、 大 写 罗 马 字符 、 小 写字 母 和 大 写字 母 ， 用 户 可 根据 需要 自行 选择 。 此 外 ， 在 【开始 
计数 】 文 本 框 中 ， 可 设置 编号 列表 的 起 始 编号 。 

在 项 目 列表 和 编号 列表 中 ， 所 对 应 的 HTML 标签 分 别 为 <u> 和 <ol>， 而 其 中 的 各 具体 
项 目 所 对 应 的 HTML 标签 均 为 <li>。 

定义 列表 主要 用 于 对 文本 中 的 特定 术语 进行 解释 或 说 明 ， 它 由 两 部 分 组 成 : 定义 名 称 
和 定义 内 容 。 其 中 ， 定 义 内 容 位 于 定义 名 称 的 下 一 行 ， 且 缩 进 显示 。 
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创建 的 定义 列表 操作 步骤 如 下 。 
(1) 在 页 面 上 输入 定义 名 称 。 

(2) 选择 【文本 】|【 列 表 】| 【定义 列表 】 命 令 。 

(3) 将 光标 置 于 定义 名 称 之 后 ， 按 Enter 键 ， 此 时 将 会 缩 进 定义 名 称 的 下 一 行 。 
(4) 在 定义 名 称 的 下 一 行 中 ， 输 入 定义 内 容 即 可 。 

定义 列表 的 创建 结果 如 图 3.22 所 示 。 


1 意 为 “网 络 日 记 ”。 但 是 ， 随 着 网 
多 的 发 展 ， 络 日 记 ， 它 已 经 和 电子 邮件 、8Q、 
JSH 样 发 展 为 百联 网 上 最 时 尚 的 个 人 展 杀 、 阅 友 交 流 工具 ， 并 成 为 当今 最 
精彩 的 网 纤 生 话 方 式 之 一 


3.22 ”定义 列表 


整个 定义 列表 所 对 应 的 <HTML> 标 签 为 <dl>， 其 中 ， 定 义 名 称 和 定义 内 容 所 对 应 的 
<HTML> 标 签 分 别 为 <dt> 和 <dd>。 


3.2 添加 图 像 


图 像 是 网 页 中 的 一 个 非常 重要 的 元 素 ， 它 极 大 地 丰富 了 页 面 的 内 容 ， 同 时 带 给 人 们 不 
一 样 的 视觉 效果 。 
3.2.1 插入 图 像 
在 页 面 中 插入 图 像 有 两 种 方法 : 一 种 方法 是 单 击 【 常 用 -插入 】 工 具 栏 中 的 【图 像 】 按 
钮 图 ， 另 一 种 方法 则 是 选择 【插入 】| 【图 像 】 命 令 。 使 用 这 两 种 方法 中 的 任 一 种 ， 系 统 都 
将 弹出 【选择 图 像 源 文件 】 对 话 框 ， 如 图 3.23 所 示 。 
选择 图 像 源 文 件 


选取 文件 名 自 加 文件 系统 站 点 和 服务 器 
口 数 据 源 


查找 范围 ;| 已 Inse* 加 oP- 


大 te 


画 inaex om 


国 zesciearv 
Top] 


文件 名 虽 : Top | TB0 x 178 JPEG, 109 kK/ 
文件 天 型)。 [国信 文件 ef jper jpeer me 加 


WL [emple/ 个 人 博客 /TeagwyTop jpe 
相对 于 : 。 [ 文 入 "es 
在 站 点 定义 中 更 改 默 认 的 链接 相对 于 


3.23 【选择 图 像 源 文件 】 对 话 框 
在 图 3.23 所 示 的 对 话 框 中 ， 可 通过 浏览 磁盘 的 文件 夹 来 指定 所 要 插入 的 图 像 文件 。 选 
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择 相应 的 图 像 文 件 后 ， 在 对 话 框 的 右 侧 可 以 预览 当前 图 像 。 单 击 【 确 定 】 按 钮 ， 即 可 将 当 
前 指定 的 图 像 文件 插入 至 页 面 的 光标 所 在 处 。 此 时 ， 还 将 弹出 【图 像 标签 辅助 功能 属性 】 
对 话 框 ， 如 图 3.24 所 示 。 


图 像 标 签 辅助 功能 属性 


图 3.24 【图 像 标签 辅助 功能 属性 】 对 话 框 
在 此 对 话 框 中 ， 可 设置 图 像 的 替换 文本 和 详细 说 明 链接 等 信息 ， 该 信息 将 用 于 当 图 像 
无 法 正常 显示 时 替换 图 像 的 提示 。 单 击 【确定 】 按 钮 ， 即 可 完成 图 像 的 插入 操作 ， 如 图 3.25 
所 示 。 


CE IE 2 ] 喇 只 用 和 e 回 芭 
De Ds De ee Es a es DE 


图 3.25 插入 图 像 


3.2.2 ”设置 图 像 属性 
在 插入 图 像 后 ， 可 在 【属性 】 面 板 中 对 图 像 的 相关 属性 进行 设置 ， 如 图 3.26 所 示 。 


1 了 属 性 
IE 109K 。。 宽 [ | 1 福 文件 全 才 /Incer/Top ind 中 已 。 苦 执 司 ”类 吕 [ 无 dg 
而 J。 ME 9 日 遇 因 四 邮 O A i 
[| 目标 边框 | ”| 主 笃 玫 
良 口 口 包 ”水 到 中 ] 低 和 解析 度 源 吕 ) 已。 对 于 | 默 U 什 ~ A 
图 3.26 设置 图 像 属性 
1. 图 像 大 小 


在 图 像 的 【属性 】 面 板 中 ，【 宽 】 和 【高 】 文 本 框 分 别 用 于 设置 图 像 的 显示 大 小 。 默 
认 情 况 下 ， 在 插入 图 像 时 ， 图 像 将 以 100% 的 比例 ( 即 原 尺 寸 大 小 ) 显 示 。 但 在 实际 应 用 中 ， 
根据 页 面 布局 的 需要 ， 经 常 需要 对 图 像 的 显示 大 小 进行 调整 。“ 宽 ”决定 了 图 像 的 显示 宽 
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度 ，“ 高 ” 则 决定 了 图 像 的 显示 高 度 。 直 接 在 【 宽 】 和 【高 】 文 本 框 中 输入 相应 的 数值 ， 


就 能 将 图 像 的 显示 调整 为 自己 所 需要 的 尺寸 ， 这 里 的 数值 单位 默认 为 像素 。 单 击 G 按 钮 ， 
可 恢复 图 像 的 原始 尺寸 。 


提示 : 在 此 处 对 图 像 大 小 的 设置 ， 仅 是 改变 其 在 屏幕 上 所 显示 的 图 像 大 小 ， 而 非 改变 图 像 
的 实际 大 小 。 如 需 改 变 图 像 的 实际 大 小 , 则 需 使 用 专业 的 图 像 处 理 软件 (如 Photoshop 
等 ) 来 进行 处 理 。 
2. 图 像 边 距 
对 于 图 像 与 周边 文本 或 其 他 对 象 之 间 的 间距 ， 可 通过 【属性 】 面 板 中 的 【垂直 边 距 】 
和 【水 平 边 距 】 选 项 来 实现 。【 垂 直 边 距 】 选 项 用 于 设置 图 像 的 项 部 和 底部 边 距 ， 即 设置 
图 像 与 上 、 下 文本 之 间 的 间距 ; 【水 平 边 距 】 用 于 设置 图 像 的 左 侧 和 右 侧 边 距 ， 即 设置 图 
像 与 左 、 右 文本 之 间 的 间距 ; 两 者 的 单位 均 默认 为 像素 。 


3. 图 像 源 文件 


在 【 源 文件 】 文 本 框 中 ， 显 示 当前 图 像 的 路 径 及 名 称 。 通 过 单 击 【 文 件 夹 】 按 钮 局， 
将 弹出 的 【选择 图 像 源 文件 】 对 话 框 ， 在 对 该 对 话 框 中 可 重新 设置 图 像 的 源 文 件 。 


4. 低 解 析 度 源 


【属性 】 面板 中 的 【 低 解 析 度 源 】 文 本 框 用 于 设置 当 载 入 主 图像 之 前 所 需 载 入 的 图 像 。 
如 果 页 面 中 所 插入 的 图 像 较 大 ， 将 导致 页 面 显示 很 慢 。 此 时 ， 可 通过 【 低 解析 度 源 】 文 本 
框 来 设置 一 个 较 小 的 蔡 代 图 像 ， 用 来 在 加 载 主 图 像 之 前 进行 显示 ， 以 便 提供 一 个 缓冲 的 余 
地 。 一 般 来 说 ， 蔡 代 图 像 使 用 主 图 像 的 2 位 ( 黑 和 白 ) 版 本 ， 因 为 它 可 以 迅速 载 入 并 使 访问 
者 对 他 们 等 待 看 到 的 主 图 像 有 所 了 解 。 

设置 蔡 代 图 像 的 方法 与 设置 图 像 源 文件 的 方法 完全 相同 , 用 户 可 通过 在 【 低 解 析 度 源 】 
文本 框 中 直接 输入 蔡 代 图 像 的 文件 路 径 及 文件 名 ， 也 可 通过 单 击 【 文 件 夹 】 按 钮 同 ， 在 弹 
出 的 【选择 文件 】 对 话 框 中 选择 图 像 。 


5. 图 像 边框 


【边框 】 文 本 框 用 来 为 所 显示 的 图 像 添加 一 个 单 色 的 矩形 边框 ， 边 框 的 宽度 以 像素 为 
单位 ， 默 认 颜 色 为 黑色 。 在 默认 情况 下 ， 图 像 无 边框 。 


6. 图 像 对 齐 


【 属性】 面板 中 的 【对 齐 】 下 拉 列 表 框 用 于 设置 图 像 与 
同一 行文 本 的 对 齐 方式 。 在 【对 齐 】 下 拉 列 表 框 中 ， 提 供 了 
多 种 图 像 对 齐 方 式 ， 如 图 3.27 所 示 。 

@ 【默认 值 】: 浏览 器 默认 的 对 齐 方式 ， 大 多 数 的 浏 

览 器 都 采用 基线 对 齐 作为 默认 对 齐 方 式 。 

@ 【基线 】: 图 像 与 当前 行 的 文本 的 基线 对 齐 。 

@ 【顶端 】: 图 像 的 顶端 与 当前 行 中 最 高 对 象 (图 像 或 

文本 ) 的 顶端 对 齐 。 图 3.27 图像 对 齐 方式 


RAT 
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【居中 】: 图 像 的 中 部 与 当前 行 的 基线 对 齐 。 

【底部 】: 图 像 底部 与 当前 行 中 最 低 对 象 (图 像 或 文本 ) 的 底部 对 齐 。 
【文本 上 方 】: 图 像 顶 端 与 当前 行 中 最 高 字符 的 顶端 对 齐 。 

【绝对 居中 】: 图 像 的 中 部 与 当前 行 中 文本 的 中 部 对 齐 。 

【绝对 底部 】: 图 像 的 底部 与 文本 行 的 底部 对 齐 。 

【 左 对 齐 】: 当前 图 像 放置 在 左边 ， 文 本 在 图 像 的 右 侧 换行 显示 。 
【 右 对 齐 】: 当前 图 像 放置 在 右边 ， 文 本 在 图 像 的 左 侧 换行 显示 。 


3.3 创建 链接 
超级 链接 是 网 页 中 不 可 少 的 元 素 之 一 ， 它 是 网 页 之 间 相互 关联 的 重要 方式 。 根 据 链 接 
的 对 象 不 同 ， 超 级 链接 的 类 型 可 分 为 文件 链接 、 命 名 锚 记 链接 和 电子 邮件 链接 3 种 。 
3.3.1 文件 链接 


文件 链接 是 指 链接 的 目标 对 象 为 文件 ， 而 链接 的 源 对 象 可 以 是 文本 、 图 像 或 其 他 对 象 。 
当选 择 需要 创建 链接 的 对 象 时 ， 在 【 属性】 面板 中 均 包 含有 【链接 】 选 项 ， 如 图 3.28 所 示 。 


1 属性 本 
字体 | 默认 字体 加 | 大 小 无 器 汪 反 起 直上 日 标 


[CRERE ，] Ri 


bp 


图 3.28 设置 链接 
在 【属性 】 面 板 中 ， 提 供 了 3 种 方式 来 创建 文件 链接 。 
@ ”直接 在 【链接 】 文 本 框 中 输入 链接 的 文件 路 径 。 
@ 单 击 【链接 】 文 本 框 右边 的 【文件 夹 】 按 钮 国 ， 在 弹出 的 【选择 文件 】 对 话 框 中 ， 
选择 所 要 链接 的 文件 ， 并 单 击 【确定 】 按 钮 ， 如 图 3.29 所 示 。 


x 
操 数 郑源 

辐 区 学 录 
局 Photo 
名 


Tonplates 
全 yeL 
全 Br 
动 EL_aad 
EL 


文件 类 型 I)。 | 所 有 文件 @ *) 


WL: ep1e/ 同 学 入 / 


相对 于 ; 文档 可 | tast aspx 
在 站 点 定义 中 更 改 默 认 的 链接 相对 于 


图 3.29 选择 文件 
@ ”如 果 所 链接 的 文件 在 Dreamweaver 中 的 【文件 】 面 板 中 ， 则 可 按 住 【指向 文件 】 


。59。 


bE Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


按钮 铝 ， 拖 动 鼠 标 至 【文件 】 面 板 中 所 要 链接 的 文件 即 可 。 

在 【属性 】 面 板 中 ， 还 包括 一 项 与 链接 相关 的 选项 ， 那 就 是 【目标 】 选 项 。 当 设置 了 
文本 或 图 像 的 超级 链接 时 ， 该 选项 将 显示 为 可 操作 项 。 在 其 下 拉 列 表 框 中 ， 包 括 _blank、 
_parent、_self、_top 等 几 个 选项 。 其 中 ， blank 选项 表示 在 新 窗口 打开 链接 页 面 ，parent 选 
项 表示 在 当前 页 面 的 父 窗口 中 打开 链接 页 面 ，_self 选项 表示 在 当前 页 面 窗口 中 打开 链接 页 
面 ，_top 选项 表示 在 当前 页 面 最 上 一 级 的 窗口 中 打开 链接 页 面 。 


3.3.2 ”命名 锚 记 链接 
对 于 文件 链接 来 说 ， 只 能 实现 页 面 与 页 面 之 间 的 链接 。 而 如 果 需 要 在 同一 个 页 面 内 ， 
设置 不 同 的 链接 至 页 面 中 不 同 的 地 方 ， 则 需要 使 用 命名 锚 记 链接 。 
在 创建 命名 锚 记 链接 之 前 ， 首 先 需要 定义 命名 锚 记 。 选 择 需 要 创建 锚 记 链接 的 文本 ， 
选择 【插入 】|【 命 名 锚 记 】 命 令 ， 此 时 将 弹出 【命名 锚 记 】 对 话 框 ， 如 图 3.30 所 示 。 


图 3.30 【命名 锚 记 】 对 话 框 


在 【命名 锚 记 】 对 话 框 中 ， 输 入 锚 记 的 名 称 。 单 击 【 确 定 】 按 钮 ， 完 成 锚 记 的 创建 。 
此 时 ， 在 定义 错 记 的 地 方 将 会 显示 相应 的 错 记 符号 唱 。 单 击 该 错 记 符号 ，【 属 性 】 面 板 将 
显示 为 锚 ， 如 图 3.31 所 示 。 


1 属性 后 
人 命名 锚 记 名 称 Linkl ] 类 [无 司 加 
<b 攻 


图 3.31 设置 锚 记 属性 


在 此 面板 中 ， 可 以 更 改 所 定义 的 锚 记 的 名 称 。 

命名 锚 记 定义 之 后 ， 则 可 将 所 要 链接 的 对 象 指向 定义 好 的 锚 记 。 

在 页 面 中 ， 选 择 命名 锚 记 所 要 链接 的 对 象 ， 在 【属性 】 面 板 的 【链接 】 文 本 框 中 输入 
#Linkl1。 其 中 ，Link1 是 前 面 所 定义 的 命名 锚 记 名 称 。 

此 时 ， 命 名 锚 记 链接 的 创建 已 完成 。 在 页 面 预览 时 ， 当 单 击 设置 命名 锚 记 的 文本 后 ， 
页 面 将 跳 转 至 所 定义 的 锚 记 处 。 


3.3.3 ”电子 邮件 链接 


除了 页 面 链接 之 外 ， 在 Dreamweaver 中 还 可 以 创建 电子 邮件 链接 。 当 在 页 面 中 添加 邮 
件 链接 之 后 ， 单 击 该 链接 即 可 调用 系统 默认 的 电子 邮件 客户 端 软件 (如 Microsoft OutLook)， 
人 允许 用 户 直接 发 送 电子 邮件 。 

电子 邮件 链接 的 创建 相当 简单 ， 在 页 面 上 选择 所 要 创建 邮件 链接 的 文本 ， 选 择 【 插 入 】| 
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【电子 邮件 链接 】 命 令 ， 此 时 将 弹出 【电子 邮件 链接 】 对 话 框 ， 如 图 3.32 所 示 。 
在 【文本 】 文 本 框 中 ， 将 会 显示 在 页 面 中 所 选择 的 要 创建 邮件 链接 的 文本 ;在 E-Mail 
文本 框 中 ， 则 可 输入 要 链接 的 邮件 地 址 。 单 击 【 确 定 】 按 钮 ， 即 可 完成 电子 邮件 链接 的 


创建 。 


图 3.32 【电子 邮件 链接 】 对 话 框 
在 页 面 预览 中 ， 单 击 所 创建 的 电子 邮件 链接 ， 即 可 打开 系统 默认 的 电子 邮件 客户 端 软 
件 ， 如 图 3.33 所 示 。 


文件 中 ”编辑 E) 查看 WW 拆 入 0) 格式 @) 工 ” 剧 | 
总 9 | 

[9 总 

发 适 5 最 7 

固 收 件 人 [ni203GMp sinacom 

[2 

主题 


图 3.33 ”打开 的 系统 默认 的 电子 邮件 客户 端 软件 


其 中 ，【 收 件 人 】 文 本 框 将 自动 显示 为 电子 邮件 链接 所 设置 的 邮件 地 址 。| 
入 邮件 主题 和 邮件 内 容 ， 单 击 【 发 送 】 按 钮 即 可 发 送 电子 邮件 。 


3.4 使 用 表格 


日 户 只 需 输 


表格 是 网 页 设计 中 用 来 控制 页 面 布 局 的 最 常用 工具 之 一 , 本 节 将 介绍 表格 的 具体 使 用 。 
3.4.1 创建 表格 
在 页 面 中 ， 将 光标 置 于 所 需 插入 表格 的 地 方 ， 单 击 【 常 用 -插入 】] 


按钮 国 ， 将 弹出 【表格 】 对 话 框 ， 如 图 3.34 所 示 。 
在 此 对 话 框 中 ， 提 供 了 所 要 创建 的 表格 的 相关 选项 。 其 中 ， 各 选项 的 含义 如 下 。 
e@ 【 行 数 】: 用 于 设置 表格 所 具有 的 行 的 数目 。 
e@ 【 列 数 】: 用 于 设置 表格 所 具有 的 列 的 数目 。 


[ 具 栏 中 的 【表格 】 
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e 【表格 宽度 】: 用 于 以 像素 为 单位 或 按 占 浏览 器 窗口 宽度 的 百分比 指定 表格 的 
宽度 。 

e@ 【边框 粗细 】: 用 于 设置 表格 边框 的 宽度 ， 其 单位 为 像素 。 

@ 【单元 格 边 距 】: 用 于 设置 单元 格 边框 与 单元 格 内 容 之 问 的 间距 ， 其 单位 为 像素 。 

@ 【单元 格 间距 】: 用 于 设置 单元 格 与 邻近 单元 格 之 间 的 间距 ， 其 单位 为 像素 。 


图 3.34 【表格 】 对 话 框 


e 【标题 】: 用 于 设置 显示 在 表格 外 的 表格 标题 。 

@ 【对 齐 标题 】: 用 于 设置 表格 标题 相对 于 表格 的 对 齐 方 式 。 

e@ 【摘要 】: 用 于 设置 表格 的 摘要 信息 ， 该 信息 将 不 会 显示 在 用 户 的 浏览 器 中 ， 但 
可 通过 屏幕 阅读 器 读 取 。 

设置 相应 的 选项 ， 单 击 【 确 定 】 按 钮 ， 即 可 完成 表格 的 创建 。 


3.4.2 表格 属性 


对 于 已 创建 的 表格 ， 可 以 通过 【属性 】 面 板 来 设置 表格 的 相关 属性 。 在 此 之 前 ， 必 须 
选择 表格 。 将 光标 置 于 表格 的 任何 一 个 单元 格 中 ， 选 择 【 修 改 】| 【表格 】| 【选择 表格 】 命 
令 ， 此 时 将 选 定 整个 表格 ， 同 时 【属性 】 面 板 中 的 选项 变 为 设置 表格 属性 的 相关 选项 ， 如 
图 3.35 所 示 。 


1 了 属 性 


运 
转 表格 TH 行 8 ”|] 宽 gm ]| 人 来 加 4 | 对 黑人 总 关 @[ 无 @ 
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图 3.35 设置 表格 属性 
在 表格 的 【属性 】 面板 中 ， 大 部 分 选项 已 在 3.3 节 中 介绍 了 , 这 里 仅 介 绍 【 背 景 颜色 】、 
【边框 颜色 】 和 【背景 图 像 】 等 选项 。 
@ 【背景 颜色 】: 主要 用 于 设置 当前 表格 的 背景 颜色 ， 用 户 可 通过 直接 在 对 应 的 文 
本 框 中 输入 颜色 的 十 六 进 制 数值 来 设置 ， 或 通过 单 击 已 :| 按钮， 在 弹出 的 调 色 板 中 
进行 选择 。 
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e@ 【边框 颜色 】: 主要 用 于 设置 当前 表格 边框 的 颜色 ， 其 设置 方法 与 【背景 颜色 】 
选项 的 设置 方法 相同 。 

@ 【背景 图 像 】: 主要 用 于 设置 当前 表格 的 背景 图 像 ， 用 户 可 直接 在 对 应 的 文本 杠 

中 输入 背景 图 像 的 文件 路 径 来 设置 ， 也 可 通过 单 击 【 文 件 夹 】 按 钮 号 ， 在 弹出 的 

【选择 文件 】 对 话 框 中 选择 图 像 文件 。 此 外 ， 设 置 背 景 图 像 还 可 通过 按 住 【指向 

文件 】 按 钮 鸥 ， 拖 动 鼠 标 至 【文件 】 面 板 中 相应 的 图 像 文 件 来 实现 。 


3.4.3 ”单元 格 设置 


单元 格 是 表格 对 象 的 一 个 基本 元 素 , 因此 对 单元 格 的 设置 是 处 理 表格 的 一 个 基本 操作 。 
一 般 来 说 ， 对 单元 格 的 设置 主要 包括 单元 格 属性 的 设置 以 及 单元 格 的 合并 与 拆 分 。 

1. 单元 格 属性 

将 光标 置 于 表格 的 单元 格 中 ，【 属 性 】 面 板 中 的 选项 将 变 为 设置 单元 格 属性 的 选项 ， 
如 图 3.36 所 示 。 


1 属性 -7 
格 e| 无 ”加 的 K 无 辐 BI 芋 要 洗面 链接 do @ 
字体 | 默认 字体 | 大 小 无 | [ml [Ec 

国共 ”水平 了 人 可 可 [ 7 行 口 “并 | 9 已 CAE 

二 Dz 二 WA vw 丙 [ 标题 门 。 。 背 最 颜色 [| FT 了 | 


图 3.36 设置 单元 格 属性 


在 该 【属性 】 面 板 中 ， 上 方 选项 用 来 设置 单元 格 中 的 文本 的 属性 ， 下 方 选 项 用 来 设置 
单元 格 的 属性 ， 这 里 仅 对 后 者 进行 介绍 。 
@ 【水 平 】: 用 于 设置 单元 格 中 的 文本 的 水 平 对 齐 方式 ， 其 选项 包括 【 左 对 齐 】、 
【居中 对 齐 】 和 【 右 对 齐 】， 其 默认 值 为 【 左 对 齐 】。 
e@ 【垂直 】: 用 于 设置 单元 格 中 的 文本 的 垂直 对 齐 方式 ,其 选项 包括 【顶端 、【 居 
中 】、【 底 部 】、【 基 线 】， 其 默认 值 为 【居中 】。 
e@ 【 宽 】 和 【高 】: 分 别 用 于 设置 单元 格 的 宽度 和 高 度 ， 其 单位 默认 为 像素 。 也 可 
通过 输入 百分比 来 设置 当前 单元 格 占 整 个 表格 宽度 或 高 度 的 百分比 。 
@ 【不 换行 】: 用 于 设置 单元 格 中 的 文本 是 否 允 许 换行 。 如 果 选 中 此 项 ， 则 当 单元 
格 中 的 内 容 超过 单元 格 的 宽度 时 ， 单 元 格 将 自动 加 宽 以 容纳 所 有 内 容 。 
e 【标题 】: 用 于 设置 当前 的 单元 格格 式 是 否 为 表格 标题 单元 格 。 默 认 情况 下 ， 表 
格 标题 单元 格 的 内 容 将 以 粗 体 显示 并 且 居 中 。 
e@ 【背景 ]: 用 于 设置 单元 格 的 背景 图 像 ， 其 操作 与 表格 的 背景 图 像 设置 相同 。 
@ 【背景 颜色 】: 用 于 设置 单元 格 的 背景 颜色 ， 其 操作 与 表格 的 背景 颜色 设置 相同 。 
@ 【边框 】: 用 于 设置 单元 格 的 边框 颜色 ， 其 操作 与 表格 的 边框 颜色 设置 相同 。 
2. 合并 单元 格 
合并 单元 格 是 指 将 所 选择 的 多 个 单元 格 合并 成 一 行 、 一 列 或 一 个 矩形 。 一 般 来 说 ， 可 
以 合并 任意 数目 的 相 邻 的 单元 格 ， 以 生成 一 个 跨 多 行 或 多 列 的 单元 格 。 
合并 单元 格 的 操作 相当 简单 ， 只 需 选择 需要 合并 的 相 邻 的 多 个 单元 格 ， 单 击 【 属 性 】 
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面板 中 的 回 按钮 即 可 。 或 在 选择 多 个 单元 格 后 ， 选 择 【修改 】|【 表 格 】|【 合 并 单元 格 】 


命令 。 
单元 格 合并 前 后 的 效果 如 图 3.37 和 图 3.38 所 示 。 
3. 拆 分 单元 格 


拆 分 单元 格 是 指 将 当前 选择 的 单元 格 拆 分 成 多 个 单元 格 。 
将 光标 置 于 所 要 拆 分 的 单元 格 中 ， 单 击 【 属 性 】 面 板 中 的 北 按钮， 此 时 将 弹出 【 拆 分 
单元 格 】 对 话 框 ， 如 图 3.39 所 示 。 


| | 
200v 200v 


图 3.37 合并 单元 格 之 前 图 3.38 合并 单元 格 之 后 


把 单元 格 拆 分 生硬 ] 
ON 


行 数 吕 : |2 $ 


图 3.39 【 拆 分 单元 格 】 对 话 框 
在 此 对 话 框 中 ， 首 先 需要 设置 的 是 将 单元 格 拆 分 成 多 行 还 是 多 列 ， 然 后 设置 相应 的 行 
数 或 列 数 ， 最 后 单 击 【 确 定 】 按 钮 。 
单元 格 拆 分 前 后 的 效果 如 图 3.40 和 图 3.41 所 示 。 
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图 3.40 ” 拆 分 单元 格 之 前 图 3.41 拆 分 单元 格 之 后 


3.5 ”典型 实例 : 创建 个 人 博客 主页 面 


在 本 实例 中 ， 将 通过 一 个 博客 主页 面 的 制作 来 进一步 掌握 以 上 元 素 的 使 用 。 

(1) 启动 Dreamweaver 8， 新 建 一 个 HIML 页 面 ， 并 将 其 命名 为 Defaulthtml。 将 视图 
切换 至 【设计 】 视 图 ， 单 击 【 属 性 】 面 板 中 的 【页 面 属性 】 按 钮 ， 在 弹出 的 【页 面 属性 】 
对 话 框 中 ， 设 置 页 面 的 上 边 距 为 0 像素 ， 如 图 3.42 所 示 。 
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页 面体 中 :默认 字体 


[BR [和 砚 


3.42 【页 面 属性 】 对 话 框 


(2) 单 击 【 确 定 】 按 钮 ， 完 成 页 面 属性 的 设置 。 
(3) 单 击 【 常 用 -插入 】 工 具 栏 中 的 【表格 】 按 钮 国 , 插入 一 个 2 行 2 列 的 表格 tablel， 
并 设置 其 宽度 为 760 像素 ， 对 齐 方 式 为 居中 对 齐 ， 边 框 为 0， 如 图 3.43 所 示 。 该 表格 将 用 
于 控制 页 面 的 整体 布局 。 
(4) 选择 表格 tablel 的 第 1 行 的 两 个 单元 格 ， 单 击 【属性 】 面 板 中 的 回 按钮 将 其 合并 。 
将 光标 置 于 合并 后 的 单元 格 中 ， 单 击 【 常 用 -插入 】 工 具 栏 中 的 【图 像 】 按 钮 图 ， 在 页 面 
中 插入 一 个 图 像 ， 该 图 像 源 文件 为 Inage 目录 下 的 图 像 文件 Top.jpg。 


TY 属性 所 
图 表格 I4 行 2 宽 Pa ]| 人 过 滞 填 ED 对 开 [居中 对 弄 避 美 无 加 @ 
tablel 国 列 2 高 [2 间距 D 边框 
知名 喇 。 表 虹 闫 色 [| 边 术 问 色 [| 
下 I I 青 景 图 像 中) OD 


图 3.43 设置 表格 属性 
(5) 选择 表格 tablel 的 第 2 行 的 第 1 个 单元 格 ， 设 置 其 水 平 对 齐 方式 为 居中 对 齐 ， 垂 
直 对 齐 方式 为 顶端 ， 宽 度 为 160 像素 ， 高 度 为 350 像素 ， 如 图 3.44 所 示 。 该 单元 格 将 用 于 
显示 个 人 形象 及 个 人 简介 等 信息 。 


属性 可 
格式 无 DE 加 BZ 要 当 本 链接 Ho © 
字体 默认 字体 ww 大 小 ~ 加 加 注 二 和 旺 吉 ”目标 

下 3% 本 ER 加 交 [ 同 稳 5D 角 CE 

口 放 下 下 mW 高 站 0 标题 口 。 青色 厂 | 边框 三 | 


图 3.44 设置 单元 格 属性 (1) 
(6) 选择 表格 tablel 的 第 2 行 的 第 2 个 单元 格 ， 设 置 其 水 平 对 齐 方式 为 右 对 齐 ， 垂 直 
对 齐 方式 为 顶端 ， 宽 度 为 600 像素 ， 高 度 为 350 像素 ， 如 图 3.45 所 示 。 该 单元 格 将 用 于 显 
示 个 人 日 志 信息 。 


Tv 属性 二 
格式 无 。” ” 癌 ” 裤 江天 站 BI | Joe © 
字体 默认 字体 | 大 小 加 司 口 | 汪 往 绎 经 目标 

区 单元 格 水 平 | 右 对 | 。 宽 [ 600| 。 不 换行 口 。 青 景 全 已 ”CeEE 

一 局 并 对 请 轴 商 [ 到 55D EJ FI |] 


3.45 ”设置 单元 格 属性 (2) 
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(7) 将 光标 置 于 表格 tablel 的 第 2 行 的 第 1 个 单元 格 中 , 单 击 【常用 -插入 】 栏 中 的 【 表 
格 】 按 钮 国 , 插入 一 个 2 行 1 列 的 表格 table2， 并 设置 其 宽度 为 158 像素 ， 间 距 为 1， 边框 
为 0， 背景 颜色 值 为 色 33333， 如 图 3.46 所 示 。 该 表格 将 用 于 显示 个 人 形象 信息 。 请 注意 ， 
这 里 表格 的 间距 、 边 框 及 背景 颜色 属性 的 设置 ， 均 是 为 了 创建 一 个 细 线 边框 表格 。 


提示 : 创建 细 线 边框 表格 是 网 页 设计 中 经 常 需要 的 。 其 最 简单 的 方法 是 ， 首 先 将 表格 的 间 


距 设置 为 1， 边框 设置 为 0， 然 后 设置 表格 的 背景 颜色 为 所 要 创建 的 细 线 边框 表格 的 
边框 颜色 ， 最 后 再 将 各 单元 格 的 背景 颜色 设置 为 白色 即 可 。 
下属 性 汤 
图 表格 Ta 行 史 IC 对 和 点 辐 类 | 无 同 加 
Ey Nl 高 像素 ”总 | ”间距 代 边框 
| | 。 边 友 [| | 
= 


3.46 ”设置 表格 属性 


(8) 将 光标 置 于 表格 table2 的 第 1 个 单元 格 中 ， 并 在 【属性 】 面 板 中 设置 其 背景 颜色 
值 为 #ADC400， 高 度 为 25， 如 图 3.47 所 示 。 


TY 属性 中 
相 式 无 间 村 无 加 [| doD © 
字体 了 内 字体 | 大 小 |13 ”| 像素 px; | 厂 -rrFfF |] 丘 汪 旺 吉 ”目标 

9 “3% 水 平 | 陵 六 加。 寓 T 执 行 口 。 背景 9 已 CRE 
一 口 北 委 直 黑人 vw 。 商 [| 25 标题 口 。 背 晤 频 色 国 |jsAnc400 边框 厂 ,|[ 


图 3.47 设置 单元 格 属性 


(9) 在 此 单元 格 中 输入 文本 “个 人 形象 ”， 选 择 该 文本 ， 在 【属性 】 面 板 中 设置 其 字 
体 颜色 为 白色 ,字体 大 小 为 13 像素 ， 并 加 粗 显 示 。 

(10) 将 光标 置 于 表格 table2 的 第 2 个 单元 格 中 ， 并 在 【属性 】 面 板 中 设置 其 背景 颜色 
为 白色 ,水 平 对 齐 方式 为 左 对 齐 。 然 后, 将 视图 切换 至 【代码 】 视 图 , 添加 该 单元 格 的 Style 
样式 ， 如 图 3.48 所 示 。 


<td bgcolor="#FFFFFF” align=left Etyle="padding-left:20px:padding-top: llpx font-size: 13px:"} 


/td> 
图 3.48 设置 单元 格 的 Style 样式 
(11) 单 击 【 常 用 -插入 】 工 具 栏 中 的 【图 像 】 按 钮 加， 在 
此 单元 格 中 插入 一 个 图 像 ， 其 源 文件 为 Image 目录 下 的 
MyPic.jpg。 
(12) 选择 表格 table2， 将 其 复制 ， 并 在 表格 table2 后 粘贴 ， 
生成 一 个 新 的 表格 table3 。 


(13) 将 表格 table3 的 第 1 个 单元 格 中 的 文本 更 改 为 “个 人 ee 
简介 ”， 然 后 将 第 2 个 单元 格 中 的 图 像 删 除 ， 并 添加 相应 的 个 | 


人 简介 信息 ， 如 图 3.49 所 示 。 这 里 ， 对 个 人 简介 信息 的 文本 格 图 3.49 个 人 简介 信息 
式 设置 不 再 叙述 。 
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(14) 将 光标 置 于 表格 tablel 的 第 2 行 的 第 2 个 单元 格 中 ， 单 击 【 常 用 -插入 】 工 具 栏 中 
的 【表格 】 按 钮 图 ， 插 入 一 个 2 行 1 列 的 表格 table4， 并 设置 其 宽度 为 590 像素 ， 高 度 为 
100%, 间距 为 1, 边框 为 0, 背景 颜色 值 为 #333333， 对 齐 方式 为 居中 对 齐 , 如 图 3.50 所 示 。 


四 表格 Id 行 2 宽 550 || 像 来 ” 汪 | ”填充 对 齐 | 居中 对 并 同类 加 ) | 无 司 ® 
te 司 列 下 高 hoo jjx x 间距 边框 0 
六 守 凡 背 晤 颜色 世 |*333333 边 恰 颜色 [| 
EX = | 总 


图 3.50 设置 表格 属性 (1) 


(15) 将 光标 置 于 表格 table4 的 第 1 个 单元 格 中 ， 在 【属性 】 面 板 中 设置 其 背景 颜色 值 
为 #ADC400， 高 度 为 25， 如 图 3.51 所 示 。 


想 反 ”可 机 大 cs |a 了 主 笃 二 下 tk 了 习 oD8 
| i | 本 | 


中 | 3 水 平 了 WA 习 。 席 | ” ”不 执行 三。 青 景 S90 ii 
一 回放 允 必 人 可 高 | 七 标题 三 ” 。 青 昌 疾 色 大 |swnc00 ”边框 让 | 由 


图 3.51 设置 表格 属性 (2) 


(16) 在 该 单元 格 中 输入 文本 “我 的 日 志 ”， 并 设置 其 字体 颜色 为 白色 ， 字 体 大 小 为 13 
像素 ， 加 粗 显示 。 
(17) 在 表格 table4 的 第 2 个 单元 格 中 ， 输 入 相应 的 日 志 信 息 ， 如 图 3.52 所 示 。 


利 


图 3.52 我 的 日 志 


需要 说 明 的 是 ， 在 正式 的 个 人 博客 系统 中 ， 我 的 日 志 以 及 个 人 简介 信息 均 是 从 数据 库 
中 取出 的 ， 而 非 直接 输入 的 固定 文本 。 这 里 为 了 说 明 页 面 的 布局 实现 ， 采 用 了 静态 的 文本 
来 蔡 代 动态 文本 的 显示 。 因 此 ， 这 里 没有 对 个 人 简介 信息 及 我 的 日 志 内 容 的 文本 格式 设置 
及 具体 布局 作 进 一 步 的 叙述 。 
至 此 ， 一 个 基本 的 个 人 博客 主页 面 已 经 成 型 ， 页 面 预览 效果 如 图 3.53 所 示 。 
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文件 如 奖 委 外 ”查看 W) 收藏 如 工具 四 ”天助 如 
三 -上 日- 四 国 的 甩 寻 去 mx 加 良 -全 回 - 国 较 日 久 曾 口 委 级 各 提 


辣 幅 的 | DV3ookNowanploV 3 dfonlt htnl 


感 融 生活 拾 巴 我 的 一 切 


呢 称 : 班 姐 

姓名 : 有 于 

性 别 : 万 

全日: 2006-3-14 
头衔 : 天 才 宝 全 

出 生地 ， 铸 南 长 诊 
座 右 阁 : 

海纳百川 ， 哇 窜 用 大 
百川 向 ， 委 奉天 下 


图 3.53 页 面 预览 效果 
3.6 习 题 


(1) 尝试 创建 一 个 细 线 边框 表格 ， 并 将 细 线 边框 的 颜色 值 设置 为 #0000FF。 

(2) 在 本 章 实例 的 “个 人 简介 ”一 栏 中 ， 添 加 电子 邮箱 一 项 ， 并 设置 相应 的 电子 邮件 
链接 。 

(3) 在 本 章 实例 中 , 使 用 一 个 较 大 的 图 像 蔡 换 页 面 顶部 的 Top.jpg 文件 , 并 在 该 图 像 的 
【属性 】 面 板 中 设置 其 【 低 解 析 度 源 〗】 选 项 ， 即 指定 一 个 图 像 加 载 过 程 中 的 替代 图 像 ， 并 
查看 页 面 加 载 效果 。 
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在 第 3 章 中 ， 详 细 地 介绍 了 Dreamweaver 中 的 各 种 基本 操作 。 这 一 章 ， 主 要 介绍 数据 
库 的 基本 概念 及 最 基本 的 操作 。 


4.1 建立 数据 库 


一 直 以 来 ,数据 库 都 是 Web 应 用 程序 开发 中 的 一 个 重要 组 成 部 分 ， 对 数据 库 的 设计 和 
操作 也 是 Web 应 用 程序 设计 和 实现 的 一 个 重要 环节 。 


4.1.1 数据 库 的 概念 


什么 是 数据 库 ? 打 个 比方 ， 每 个 人 都 会 有 自己 的 地 址 籍 ， 上 面 记录 了 各 个 亲朋 好 友 的 
姓名 、 地 址 、 联 系 电话 等 。 这 个 实际 上 就 是 一 个 简单 的 “数据 库 ”， 它 所 记录 的 每 个 人 的 
信息 就 是 “数据 库 ” 中 的 数据 。 通 过 查询 地 址 短 ， 可 以 知道 如 何 联系 上 面 的 每 个 人 ; 同时 ， 
也 可 以 不 断 地 往 地 址 舌 上 添加 更 多 朋友 的 联系 方式 。 

简单 地 说 ， 数 据 库 就 是 按 某 种 规则 将 数据 组 织 起 来 的 持久 数据 的 集合 ， 这 些 数据 可 用 
于 一 些 特定 的 应 用 中 。 在 数据 库 中 ， 用 户 可 以 按照 特定 的 方式 来 存储 数据 ， 同 时 一 旦 数据 
被 存储 至 数据 库 中 ， 就 可 以 方便 地 查询 其 中 的 信息 。 此 外 ， 对 于 数据 库 中 的 信息 ， 还 可 进 
行 相应 的 添加 、 修 改 和 删除 。 

目前 ， 常 用 的 数据 库 包 括 Oracle、Microsoft SQL Server、Microsoft Access、Sybase、 
DB2 等 ， 而 在 Web 应 用 程序 开发 中 ， 尤 以 Microsoft SQL Server 数据 库 和 Microsoft Access 
数据 库 应 用 最 多 。 

在 本 书 中 的 所 有 示例 中 ， 均 使 用 Microsoft Access 2000 数据 库 。 本 章 将 着 重 介绍 
Microsoft Access 2000 数据 库 的 各 项 基本 操作 。 

Microsoft Access 是 一 个 关系 型 数据 库 系统 , 它 也 是 微软 Office 办 公 套 件 中 的 一 个 重要 
组 成 部 分 。 与 其 他 数据 库 相 比 ，Microsoft Access 数据 库 更 加 简单 易学 ， 对 于 普通 的 计算 机 
户 均 可 掌握 并 使 用 它 。Microsoft Access 数据 库 的 功能 相当 强大 ， 完 全 可 以 应 付 一 般 的 数 
据 管理 及 处 理 需 要 。 


提示 : 所 谓 关系 型 数据 库 ， 其 基本 特征 是 按照 关系 数据 模型 组 织 数据 库 ， 具 体 表 现 为 以 行 
和 列 的 形式 来 存储 数据 ， 一 系列 的 行 和 列 就 构成 了 数据 表 ， 一 系列 的 数据 表 构 成 了 
数据 库 。 关 系 型 数据 库 以 其 结构 简单 、 理 论 基 础 坚实 、 数 据 独 立 性 高 以 及 提供 非 过 
程 性 语言 等 优点 而 被 认为 是 具有 很 大 发 展 前 景 的 一 种 数据 库 ，Microsoft Access 数据 
库 便 是 其 中 之 一 。 
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4.1.2 建立 Access 数据 库 


创建 Access 数据 库 的 方法 有 两 种 : 一 种 方法 是 创建 一 个 空 的 数据 库 ， 即 一 个 没有 数据 
表 、 查 询 、 窗 体 和 报表 等 内 容 的 数据 库 ， 另 一 种 方法 是 通过 Access 中 提供 的 数据 库 模 板 
来 创建 数据 库 ， 即 通过 向 导 中 的 选项 来 设计 窗 体 、 查 询 和 报表 等 ， 从 而 建立 一 个 完整 的 数 
据 库 。 

一 般 来 说 , 更 多 的 用 户 需 要 创建 一 个 空 的 数据 库 , 然后 在 其 中 添加 新 的 数据 表 。 这 里 ， 
以 创建 空 的 数据 库 为 例 ， 来 介绍 如 何 建立 Access 数据 库 ， 其 具体 步骤 如 下 。 

(1) 运行 Microsoft Access， 此 时 将 弹出 如 图 4.1 所 示 的 对 话 框 ， 提 示 用 户 目前 所 要 执 
行 的 操作 ， 其 中 包括 【 空 Access 数据 库 】、【Access 数据 库 向 导 、 数 据 页 和 项 目 】 和 【 打 
开 已 有 文件 】3 个 选项 。 


Te 
一 
回 ]= 

heenss 攻 所 库 疝 导 ， 数据 页 项目 ) 


多 个 打开 有 文件 四 


4.1 Microsoft Access 对 话 框 


如 果 Microsoft Access 已 经 运行 ， 用 户 也 可 选择 【文件 】| 【新建 】 命 令 ， 此 时 将 弹出 
如 图 4.2 所 示 的 【新 建 】 对 话 框 。 
CC JJ 
第 用 。 | 数据 库 | 


面 加 两 全 Ep 


是 
了 出 。 数据 访问 页 项 目 ( 现 有 项 


图 4.2 【新 建 】 对 话 框 


(2) 在 Microsoft Access 对 话 框 中 选择 新 建 数据 库 中 的 【 空 Access 数据 库 】 选 项 ， 或 
在 【新 建 】 对 话 框 中 选择 【数据 库 】 选 项 ， 然 后 单 击 【 确 定 】 按 钮 ， 将 弹出 如 图 4.3 所 示 
的 【文件 新 建 数据 库 】 对 话 框 。 

(3) 在 【文件 名 】 文本 框 中 输入 所 要 新 建 的 数据 库 名 (如 MyDB)， 并 选择 新 建 数据 库 
所 要 保存 的 路 径 ， 然 后 单 击 【 创 建 】 按 钮 ， 即 可 创建 一 个 名 为 MyDB 的 空 Access 数据 库 ， 
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并 显示 如 图 4.4 所 示 的 窗口 。 


文件 新 建 数 万 库 


加 7 人 日 编 纺 (D 视 区 由 插 AD 工具 ID 窗 D 帮助 
]D 芒 回 | 号 区 分 | 少 昌 外 闻 | 一 | 坚 -| 丽 -| 鹅 | 印 | 虽 看 -| 回 | 


团 m9 
GE 


| a a a ll .J I 7 
图 4.4 【MyDB: 数据 库 】 窗 口 
从 此 窗口 中 也 可 看 出 ， 所 创建 的 MyDB 数据 库 中 没有 任何 数据 表 ， 而 仅 有 三 个 用 于 创 
建 数据 表 的 相关 向 导 。 
4.1.3 ”建立 数据 表 


数据 表 是 Access 数据 库 中 最 基本 的 对 象 ， 也 是 数据 库 中 所 有 数据 的 载体 。 数据 库 中 的 
其 他 对 象 ， 如 查询 、 窗 体 、 报 表 等 , 也 是 将 表 中 的 信息 以 各 种 形式 表现 出 来 , 方便 用 户 使 用 。 

数据 表 可 以 分 为 两 部 分 : 表 结 构 和 表 数 据 ， 而 在 本 小 节 中 所 要 叙述 的 是 创建 数据 表 的 
表 结构 。 表 结构 是 指数 据 表 的 框架 ， 其 基本 要 素 是 字段 。 每 个 字段 都 有 自己 的 属性 ， 主 要 
包括 如 下 。 


1. 字段 名 称 


字段 的 名 称 ， 用 于 标识 表 中 的 一 列 。 对 于 同一 个 表 中 的 字段 名 称 ， 具 有 惟一 性 ， 即 不 
允许 两 个 同名 的 字段 存在 。 
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2. 数据 类 型 


根据 关系 数据 库 理 论 ， 一 个 数据 表 中 的 同一 列 数据 必须 具有 共同 的 数据 特征 ， 这 就 是 
数据 类 型 。 在 Access 中 ， 所 提供 的 数据 类 型 包括 : 文本 、 数 字 、 备 注 、 日 期 /时 间 、 货 币 、 


自动 编号 、 是 / 否 、OLE 对 象 、 超 级 链接 等 ， 其 说 明 见 表 4.1。 
表 4.1 Access 中 所 提供 的 数据 类 型 及 说 明 
数据 类 型 使 用 说 明 字段 大 小 
用 于 存储 文本 信息 ， 如 姓名 、 地 址 等 ; 或 任何 不 用 作 计算 
最 长 为 255 个 字符 
A 的 数字 的 数据 ， 也 可 以 是 文本 与 数字 的 组 合 WE 
由 “字段 大 小 ”属性 中 所 
a 
数字 用 于 存储 需要 进行 数学 运算 的 数字 数据 由 
备注 用 于 存储 多 于 255 个 字符 的 文本 数据 最 长 为 64 000 个 字符 
日 期 时间 | 用 于 存储 日 期 及 时 间 数 据 8 个 字 节 
i 用 于 存储 类 似 于 金额 的 数字 数据 : 可 条 免 在 计算 时 发 生 四 |。 
舍 五 入 的 情况 ， 可 精确 到 小 数 点 左边 15 位 及 右边 4 位 二 
此 字段 可 在 添加 记录 时 自动 插入 依次 递增 的 惟一 序号 (每 
本 
Rie 次 加 1) 或 随机 生成 的 编号 a 
此 字段 仅 记录 用 户 所 选择 的 值 对 中 的 一 种 取 值 ， 如 是 / 否 、 
是 / 否 真 / 假 、 开 / 关 等 ， 可 通过 字段 中 的 “格式 ”属性 来 确定 值 | 1 个 字 节 
对 的 类 型 
用 于 存储 诸如 Microsoft Word 或 Microsoft Excel 文档 、 图 
字段 大 小 受 磁盘 空 1 
OLE 对 象 。 | 片 、 声 音 的 数据 以 及 在 别 的 程序 中 所 创建 的 其 他 类 型 的 一 | 字段 大 小 受 厂 盘 空 门限 
制 ， 最 大 为 1GB 
进 制 数据 
超级 链接 ”| 用 于 存储 超级 链接 数据 最 长 为 64 000 个 字符 
用 于 存储 从 已 有 的 表 或 查询 中 所 查阅 到 的 值 , 或 者 是 创建 
查阅 向 通常 为 4 个 字 
风向 号 。 | 字段 时 所 给 入 的 一 组 国定 值 的 集合 人 
3. 字段 大 小 
字段 大 小 ， 是 指数 据 表 中 的 一 列 所 能 容纳 的 最 大 字符 个 数 。 默 认 情况 下 ， 字 段 大 小 以 
字 节 为 单位 。 
4 其 他 属性 


除 以 上 属性 外 ， 字 段 还 具有 其 他 属性 ， 如 格式 、 默 认 值 、 有 效 性 规则 、 有 效 性 文本 、 
必 填 字段 、 索 引 等 。 对 于 不 同 数据 类 型 的 字段 ， 其 所 具有 的 相关 属性 将 会 有 所 不 同 。 
在 对 数据 表 有 所 了 解 之 后 ， 下 面 来 看 如 何 建立 数据 表 。 


在 如 图 


表 、 使 用 向 


4.4 所 示 的 数据 库 窗口 中 可 以 看 到 ， 创 建 数据 表 有 3 种 
导 创 建 表 和 通过 输入 数据 创建 表 。 这 里 ， 主 要 介绍 如 何 


数据 两 种 方法 来 创建 一 个 记录 地 址 德 信息 的 数据 表 。 
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例 : 通过 设计 器 来 创建 数据 表 。 

通过 设计 器 来 创建 数据 表 的 具体 步骤 如 下 。 

(1) 双击 【MyDB: 数据 库 】 窗 口中 的 【使 用 设计 器 创建 表 】 选 项 ， 将 弹出 数据 表 的 
设计 窗口 ， 如 图 4.5 所 示 。 


| 加 文 名 四 近视 医生 和 (D 工具 WD 育 Pew 和 Ih | 
| 国 -| 加 | 备 芒 节 |% 审 忆 久 | 呈请 | 芝 妆 | 略 信 | 国光 - 加. 


A 
按 下 人 


证 疯 田 。 ”B= 葬 引 面相 。 FI = 更 贱 。 T Ll ll i 
图 4.5 表 设 计 窗 口 
(2) 在 【字段 名 称 】 列 中 ， 输 入 第 一 个 字段 的 名 字 Name( 表 示 姓 名 )， 然 后 按 Enter 键 ， 


此 时 在 【数据 类 型 】 列 中 将 会 显示 一 个 类 型 选择 按钮 ， 单 击 该 按钮 ， 在 弹出 的 下 拉 列 表 中 
选择 【文本 】 选 项 ， 设 置 Name 字段 的 类 型 为 文本 型 ， 如 图 4.6 所 示 。 


ETTTTTETTETOETTOE TY EE 
STERN TE ELH 
Er 


同 江 入 本 。 16 = 说 可 将 格 。 页 = 大 由 。 sl Sl sl se EL 


图 4.6 添加 字段 Name 


(3) 此 时 ， 在 【字段 属性 】 域 的 【常规 】 选 项 卡 中 ， 显 示 了 该 字段 的 其 他 属性 ， 包 括 
字段 大 小 、 格 式 、 输 入 法 模式 、 默 认 值 、 必 填 字 段 、 索 引 等 。 这 里 ， 将 字段 Name 的 大 小 
设置 为 20，【 必 填 字段 】 选 项 设置 为 【是 】( 即 该 字段 为 必须 输入 的 字段 )，【 人 允许 空 字符 
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串 】 选 项 设置 为 【和 否 】( 即 不 允许 输入 为 空 )， 如 图 4.7 所 示 。 


四 vcrnseft Access - [雪上 表 ] 


] 目 文昌 病 总 日 视 区 插 和 工具 D 要 Pt 大 和 中 
| 国 -| 回 | 号 区 和 节 | 区 时 筷 邓 | 虽 |* 如 | 扩 全 | 男人 福 | 国 看- 器 .| 
和 


Bl sl 1 J gd lS 


图 4.7 设置 字段 属性 


(4) 重复 步 又 (2) 和 (3)， 依 次 添加 其 他 字段 ， 并 设置 其 字段 名 称 、 数 据 类 型 及 字段 大 小 
等 相关 属性 ， 如 图 4.8 所 示 。 


| 回 文件 护 杠 (E) 视图 由 插入 GD 工具 四 从 Pw) 和 MD) lol x)| 
| 四 -| 加 | 分 凡 入 | 用 他 当 oj? 区 | 放 多 | 印信 | 后 者 -| 器. 
EE EE 

Nome 文本 

Birth 日 期 /时间 

Sa 文本 

六 

dar 文本 

| 备注 

到 
字段 屋 性 

寓 现 | 查 辐 | 

格式 

输入 法 要 区 入 法 开 

标题 

黑人 信 

让 全 入 长 可 到 54 个 字符 ( 包括 空 

有 并 必 文本 格 ) 。 控 Fl 键 可 和 看 有 关于 引 人 称 的 四 
好 须 字 让 理 过 

区 并 信守 三 串 否 

nicoie 压 嘱 是 
WI。 二 阁下 了- a sl sl ll sl 


4.8 依次 添加 其 他 字段 
在 以 上 添加 的 字段 中 , Birth 表示 出 生日 期 , 其 数据 类 型 为 日 期 /时 间 型 ; Sex 表示 性 别 ， 


其 数据 类 型 为 文本 型 ，Tel 表示 联系 电话 ， 其 数据 类 型 为 文本 型 ，Addr 表示 联系 地 址 ， 其 
数据 类 型 为 文本 型 ，Memo 表示 个 人 备注 信息 ， 其 数据 类 型 为 备注 型 。 

(5) 字段 添加 完成 后 ， 单 击 司 按钮 【保存 】 按 钮 )， 将 弹出 【另存 为 】 对 话 框 ， 要 求 
输入 该 数据 表 的 名 称 ， 这 里 将 该 表 命名 为 “地 址 短 ”， 如 图 4.9 所 示 。 
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另存 为 ?21x 
素 名 称 中- 
[| 


图 4.9 【另存 为 】 对 话 框 


提示 : 一 般 情况 下 ， 在 实际 应 用 中 ， 数 据 表 的 命名 尽量 不 要 使 用 中 文 ， 最 好 使 用 英文 。 因 
为 在 程序 设计 时 ， 英 文 的 输入 比 中 文 的 输入 要 快 ， 这 会 给 用 户 带 来 一 定 的 便利 ; 此 
外 ， 在 Web 应 用 中 ， 也 可 避免 由 于 某 些 浏览 器 对 中 文 的 不 支持 而 带 来 一 些 问题 。 此 
处 ， 仅 仅 是 便于 用 户 明白 该 表 的 用 途 ， 因 此 采用 了 中 文 命 名 。 


(6) 单 击 【确定 】 按 钮 ， 系 统 将 弹出 【尚未 定义 主键 】 对 话 框 ， 如 图 4.10 所 示 。 


南 未 定义 主键 - 
个 起 一 铬 ' 但 应 尽量 定义 主 插 。 一 个 表 , 只 有 定义 了 主键 ， 才 能 定义 该 表 与 煞 据 库 中 其 他 表 同 的 关系 。 


再 四 取消 
图 4.10 【尚未 定义 主键 】 对 话 框 


Access 对 于 所 创建 的 每 一 个 表 都 要 求 定 义 一 个 惟一 的 主 关键 字 段 , 即 主键 。 所 谓 主键 ， 
是 数据 表 中 每 一 条 记录 的 惟一 标识 。 为 确保 惟一 性 ，Access 禁止 在 主键 字段 中 输入 重复 值 
或 NULL 值 。 


提示 : 主键 字段 不 一 定 是 一 个 字段 ， 它 也 可 以 是 多 个 字段 的 组 合 ， 即 这 多 个 字段 的 值 在 数 
据 表 中 是 惟一 的 。 


对 于 如 图 4.10 所 示 的 对 话 框 ， 如 果 单 击 【 是 】 按 钮 ， 系 统 将 自动 创建 一 个 名 为 ID 的 
主键 字段 ， 其 数据 类 型 为 “自动 编号 ”; 如 果 单 击 【 否 】 按 钮 ， 系 统 将 取消 保存 操作 ， 返 
回 表 的 设计 页 面 ， 等 待 用 户 自 定义 一 个 主键 ; 如 果 单 击 【取消 】 按 钮 ， 系 统 将 取消 主键 的 
创建 并 保存 该 表 。 在 这 里 ， 单 击 【 取 消 】 按 钮 。 

至 此 ， 数 据 表 的 创建 工作 全 部 完成 ， 用 户 可 以 在 数据 表 中 添加 数据 了 ， 此 步 操 作 将 在 
4.2 节 介 绍 。 

例 : 通过 输入 数据 创建 数据 表 。 

通过 输入 数据 创建 数据 表 ， 也 就 是 用 户 首先 输入 数据 ， 然 后 Access 根据 用 户 输入 的 数 
据 来 创建 一 个 数据 表 。 

双击 数据 库 窗 口中 的 【通过 输入 数据 创建 表 】 选 项 ， 系 统 将 弹出 数据 表 的 数据 输入 窗 
口 ， 如 图 4.11 所 示 。 

默认 情况 下 , 数据 输入 窗口 提供 了 10 个 字段 , 字段 名 分 别 为 “字段 1”、“ 字 段 2”、……… 
“字段 10”。 用 户 可 以 直接 在 该 窗口 中 输入 数据 ， 输 入 了 多 少 个 字段 的 数据 ， 所 创建 的 表 
就 有 多 少 个 字段 。 各 字段 的 数据 类 型 由 Access 根据 用 户 所 输入 的 数据 自动 进行 判断 , 例如 
户 在 某 列 输入 了 数值 ， 则 该 列 被 认为 是 数字 类 型 ， 在 某 列 输入 了 字符 ， 则 该 列 将 被 认为 
是 文本 类 型 。 
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此 方法 可 以 在 输入 数据 的 同时 创建 新 表 ， 给 用 户 带 来 一 定 的 便利 。 但 是 ， 
中 ， 由 了 


EECETTTEETE 本 al 
| 司 -| 回 | 号 区 条 | 关 苇 本 池 | 王 | 罗 | 外 到 | 且 忆 羡 | 十 | 二 区 | 国庆 -| 回 - 
字段 1 字 及 2 字 肪 3 Ea 卫生 5 了 县 6 字 入 7 了 字 县 8 


: | 1 了 上 | 时 | 二 | 共有 记录 数 : 21 
要 所 表 ” 视 权 


mal al sl la il 


4.11 数据 表 的 数据 输入 窗口 


在 实际 操作 


F 表 的 字段 名 是 默认 的 ， 在 输入 数据 的 同时 不 能 修改 表 的 字段 名 。 因 此 ， 用 户 往往 


还 需要 在 创建 该 表 后 ， 对 表 进 行 编辑 ， 把 表 的 字段 名 修改 为 自己 所 需要 的 字段 名 。 
通常 情况 下 ， 建 议 采用 表 的 设计 器 来 创建 数据 表 。 


4.1.4 ”数据 库 的 打开 与 关闭 


打开 Access 数据 库 的 方法 有 三 种 。 
(1) 运行 Microsoft Access, 此 时 将 弹出 如 图 4.12 所 示 的 对 话 框 。 选 择 【 打 开 已 有 文件 】 
单 选 按钮 ， 在 下 面 的 列表 框 中 显示 了 最 近 打 开 过 的 Access 数据 库 。 如 果 要 打开 的 数据 库 已 


在 其 中 ， 


b 


则 可 选中 该 数据 库 的 名 称 并 单 击 【确定 】 按 钮 ， 或 直接 双击 。 


TS 
加 | 个 要 heeess 鸡 据 床 四 ) 


EN 笋 拖 页 和 项 目 


办 "ren 

E - 
ee 

1 要 __ 到 


4.12 ”Microsoft Access 对 话 框 


如 果 要 打开 的 数据 库 不 在 列表 中 ， 则 可 双击 【更 多 的 文件 】 选 项 ， 此 时 将 弹出 【打开 】 
对 话 框 ， 如 图 4.13 所 示 。 

通过 浏览 磁盘 文件 夹 ， 找 到 要 打开 的 数据 库 ， 单 击 【 打 开 】 按 钮 。 

(2) 如 果 Microsoft Access 已 经 运行 ， 此 时 可 选择 【文件 】| 【打开 】 命 令 ， 在 弹出 的 
【打开 】 对 话 框 中 ， 选 择 要 打开 的 数据 库 文件 。 

(3) 在 【资源 管理 器 】 或 【我 的 电脑 】 中 找到 要 打开 的 Access 数据 库 文件 (以 .mdb 为 
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后 级 名 )， 双 击 该 文件 ， 即 可 打开 该 数据 库 。 


ET ET 了 +QX EE IRV-. 


文件 型 四: [小 略 文件 (db * sap.* tnd + mde; 可 


图 4.13 【打开 】 对 话 框 


关闭 Access 数据 库 的 方法 也 有 以 下 3 种 。 

(1) 选择 【文件 】| 【关闭 】 或 【退出 】 命 令 ， 均 可 关闭 当前 打开 的 数据 库 。 前 者 ， 仪 
关闭 数据 库 ， 但 不 关闭 Microsoft Access; 而 后 者 在 关闭 数据 库 的 同时 ， 也 将 关闭 Microsoft 
Access。 

(2) 直接 单 击 数据 库 窗口 中 的 标题 栏 右 侧 的 区 按钮， 关闭 当前 打开 的 数据 库 。 

(3) 由 于 在 一 个 Microsoft Access 窗口 中 ， 只 能 打开 一 个 Access 数据 库 ， 因 此 可 以 通 
过 打开 另 一 个 数据 库 的 方法 来 关闭 当前 数据 库 。 


4.2 数据 库 字 段 的 操作 


在 实际 运用 中 ， 对 于 创建 的 数据 库 表 ， 常 常 由 于 各 种 原因 需要 对 其 表 结构 进行 修改 。 
接 下 来 ， 介 绍 在 Access 中 对 数据 库 字 段 的 一 些 常用 操作 。 


4.2.1 主键 字段 设 定 


在 创建 名 为 “地 址 德 ” 的 数据 表 时 ， 曾 提 到 主键 字段 是 表 中 记录 的 标识 性 字段 。 而 在 
前 面 创建 数据 表 的 步骤 (6) 中 ， 单 击 的 是 【取消 】 按 钮 ， 也 就 是 没有 为 该 表 创 建 主键 。 现 在 
为 该 表 设 定 主 键 。 

在 【MyDB: 数据 库 】 窗 口中 选择 【地 址 簿 】， 然 后 单 击 【 设 计 】 按 钮 ， 或 右 击 该 表 ， 
从 弹出 的 快捷 菜单 中 选择 【设计 视图 】 命令, 即 可 进入 数据 表 的 设计 窗口 ， 如 图 4.14 所 示 。 

选择 Name 字段 ， 然 后 单 击 里 按钮 ， 即 可 将 Name 字段 设置 为 “地 址 敌 ” 表 的 主键 字 
段 。 此 时 ， 在 Name 字段 的 标 头 将 会 显示 加 图 标 ， 表 示 该 字段 为 主键 。 


注意 : 这 里 将 保存 “姓名 ”的 字段 设置 为 表 的 主键 。 


事实 上 ， 作 为 主键 的 字段 其 数据 是 不 允许 为 空 的 ， 而 作为 姓名 ， 很 有 可 能 会 出 现 同 名 
的 情况 。 正 是 出 于 这 种 考虑 ， 在 Access 中 允许 将 多 个 字段 同时 设置 为 主键 ， 只 要 这 多 个 字 
段 的 数据 不 完全 一 样 ， 也 就 不 违反 主键 规则 。 因 此 ， 可 以 将 Name 字段 和 Birth 字段 同时 设 
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置 为 主键 ， 毕 竟 同 一 天 出 生 且 姓名 完全 相同 的 人 很 少 。 


A 9 lalx| 
全 | 加 | 过 芭 茅 | 车 忆 多 | 中 称 | 六 了 | 狼人 六 | 画 独 -| 园 . 


2 
轩 5 汪 滑 


4.14 数据 表 的 设计 窗口 


将 多 字段 设置 为 主键 的 具体 操作 如 下 。 

(1) 取消 原 有 的 主键 设置 。 选择 Name 字段 然后 单 击 是 按钮 , 此 时 该 字段 标 关上 的 区 
标识 将 会 消失 ， 表 示 已 经 取消 了 该 字段 的 主键 设置 。 

(2) 选择 Name 字段 ， 按 住 Ctrl 键 ， 选 择 字段 Birth， 单 击 时 按钮， 即 可 完成 主键 的 设 
置 。 此 时 ， 在 Name 字段 和 Birth 字段 的 标 头 ， 均 显示 了 欧 标 识 ， 如 图 4.15 所 示 。 


上 四 文 作 扣 编 和 6) 视图 插 XD 工具 (D 窗 C(w) 帮助 中 elx| 
| 四 -| 加 | 驴 区 条 | 中 名 多 | 


| 54 个 李 符 ( 
黑 兴 从 TT 
有 效 性 文本 
少 十 字段 是 
区 许字 符 囊 理 
素 引 无 
Wnicode 压 连 是 
和 ll 


4.15 设置 主键 


设置 Name 字段 和 Birth 字段 同 为 主键 ， 意 味 着 这 两 个 字段 的 数据 均 不 能 为 空 ， 也 不 能 
出 现 重复 的 情况 ， 这 是 在 编程 应 用 中 必须 注意 的 。 


4.2.2 ”添加 字段 
对 已 创建 的 数据 表 ， 可 以 添加 新 的 字段 ， 其 操作 如 下 。 
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选择 要 增加 字段 所 在 的 行 并 右 击 ， 在 弹出 的 快捷 菜单 中 选择 【插入 行 】 命 令 。 此 时 ， 
将 会 在 所 选择 的 行 处 插入 一 个 空 行 。 然 后 ， 在 空 行 中 输入 新 字段 的 名 称 并 设置 数据 类 型 等 
相关 属性 。 

如 果 要 在 表 的 最 后 新 增 一 个 字段 ， 则 直接 在 表 的 最 后 一 个 字段 的 下 一 行 输入 要 新 字段 
的 名 称 并 设置 相关 属性 即 可 。 

操作 完成 后 ， 单 击 辆 按钮 ， 保 存 所 做 的 修改 。 


4.2.3 ”删除 字段 


删除 字段 的 操作 较为 简单 ， 其 具体 操作 如 下 。 

首先 ， 选 择 要 删除 的 字段 并 右 击 ， 在 弹出 的 快捷 菜单 中 选择 【删除 行 】 命 令 ， 或 者 直 
接 按 下 Delete 键 ， 即 可 从 数据 表 中 删除 该 字段 。 

操作 完成 后 ， 单 击 圆 按 钮 ， 保 存 所 做 的 修改 。 


4.2.4 调整 顺序 


如 果 需 要 调整 字段 的 顺序 ， 可 选择 需要 移动 位 置 的 字段 ， 然 后 按 住 鼠标 并 拖 动 鼠标 至 
希望 移 至 的 位 置 再 松 开 。 此 时 ， 所 选择 的 行将 被 移动 到 指定 的 位 置 上 。 
操作 完成 后 ， 单 击 图 按钮， 保存 所 做 的 修改 。 


4.2.5 ”设置 字段 必 填 属性 


在 字段 的 常规 属性 中 ，【 必 填 字 段 】 与 【人 允许 空 字符 串 】 是 两 个 非常 重要 的 属性 ， 很 
多 初学 者 常常 无 法 分 清 这 两 个 属性 的 区 别 。 

所 谓 必 填 字段 ， 是 指 字 段 中 的 数据 必须 有 值 。 如 果 该 属性 设置 为 【是 】， 则 表示 该 字 
段 中 必须 有 内 容 ， 而 不 能 为 NULL( 请 注意 ，NULL 不 等 于 空 字符 串 )。 

允许 空 字 符 串 ， 表 示 该 字段 中 的 数据 是 否 允 许 为 空 的 字符 串 (如 空格 )， 该 属性 在 编写 
程序 时 需要 特别 注意 。 如 果 该 字段 不 允许 为 空 字符 串 ， 则 在 添加 数据 时 必须 保证 该 字段 的 
数据 不 能 为 空 。 


4.3 数据 的 操作 


前 面 介绍 了 数据 库 字 段 的 操作 方法 ， 接 下 来 介绍 如 何 对 数据 表 中 的 数据 进行 操作 ， 包 
括 数据 的 添加 、 删 除 和 修改 。 


4.3.1 数据 表 中 记录 的 添加 


创建 了 数据 表 ， 便 可 以 向 数据 表 中 添加 数据 。 要 知道 ， 数 据 表 只 是 一 种 载体 ， 而 数据 
才 是 用 户 真 正 需要 的 。 

向 数据 表 中 添加 数据 ， 有 两 种 方法 : 一 种 是 直接 打开 表 的 浏览 窗口 ， 添 加 数据 ; 另 一 
种 则 是 在 查询 窗口 中 通过 SQL 语句 向 表 中 添加 数据 。 这 里 ， 主 要 介绍 第 一 种 方法 。 

在 数据 库 窗口 中 ， 双 击 要 添加 数据 的 数据 表 ， 即 可 打开 该 表 的 浏览 窗口 ， 如 图 4.16 
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所 示 。 


ccess - [ 培 址 等: 表 ] 
文件 {E) 编辑 (E) 视 苞 (VW) 所 入 D 格式 (0) 记录 (R) 工具 (D 窗口 (W) 帮助 (H) 
LE 了 


记录 : ML ， | | | 共有 记 好 数 -1 
PE [rrrr mrr 4 


4.16 ”数据 表 的 浏览 窗口 


在 数据 表 的 浏览 窗口 中 ， 表 头 显示 的 就 是 定义 的 字段 。 在 表 头 的 下 方 是 一 空 行 ， 且 每 
一 列 均 对 应 一 个 单元 格 ， 这 个 空 的 单元 格 就 是 输入 数据 的 地 方 。 直 接 在 各 个 单元 格 中 输入 
相应 的 数据 ， 如 图 4.17 所 示 。 


=|Djx| 

| 四 文 余 虽 ， 轴 辑 (E) 视图 (， 揪 和 (D 格式 (0) 记 好 (BR) 工具 (D 窗口 w) 帮助 HD =18| 

" 则 和 和 和 | 玉 天 了 的 辣 和 -| 回 . 
Se Tel Addr_ sme 


1978-06-11 男 10)85476955 。 中 国 北京 这 是 备注 稍 息 
1975-12-03 女 (0731)8805178 湖南 长 涂 这 是 备注 信息 


4.17 输入 数据 


一 般 来 说 ， 在 添加 数据 的 同时 ， 需 要 注意 以 下 三 点 。 

(1) 输入 的 数据 应 与 该 字段 所 定义 的 数据 类 型 一 致 , 如 在 Birth 字段 对 应 的 单元 格 中 必 
须 输入 日 期 格式 的 数据 。 

(2) 必须 保证 主键 不 冲突 ， 即 对 于 定义 为 主键 的 字段 ， 其 数据 不 能 重复 。 在 本 例 中 ， 
数据 表 的 主键 为 Name 字段 和 Birth 字段 。 在 图 4.17 中 , 已 经 输入 了 Name 字段 为 “ 张 三 ”、 
Birth 字段 为 “1978-08-11” 的 数据 ， 那 么 在 后 面 的 记录 添加 中 ， 不 能 再 有 Name 字段 为 “ 张 
三 ”、Birth 字段 为 “1978-08-11” 的 数据 ， 否 则 系统 将 提示 系统 主键 冲突 ， 如 图 4.18 所 示 。 


， 请 求 对 表 的 改变 没有 成 功 。 改变 该 字段 中 的 或 包 全 重复 数据 的 字段 中 的 数据 ,删除 素 


CE wo | 


4.18 系统 提示 主键 冲突 


(3) 对 于 输入 的 数据 ,不 能 违反 其 相应 字段 所 定义 的 规则 。 例 如 ，Name 字段 所 定义 的 
大 小 为 20 个 字符 ， 也 就 是 说 Name 字段 对 应 的 数据 不 能 超过 20 个 汉字 。 
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4.3.2 ”数据 表 中 记录 的 删除 


对 于 数据 表 中 记录 的 删除 ， 可 分 为 两 种 情况 : 删除 单条 记录 和 同时 删除 多 条 记录 ， 其 
操作 分 别 如 下 。 

1. 删除 单条 记录 

(1) 通过 单 击 要 删除 的 记录 左边 的 记录 选 定 器 选择 该 记录 ， 然 后 右 击 ， 在 弹出 的 快捷 
菜单 中 选择 【删除 记录 】 命 令 , 此 时 系统 将 弹出 删除 确认 对 话 框 , 如 图 4.19 所 示 。 单 击 【 是 】 
按钮 ， 即 可 删除 该 条 记录 。 

(2) 选择 要 删除 的 记录 ， 直 接 按 Delete 键 ， 在 弹出 的 删除 确认 对 话 框 中 ， 单 击 【 是 】 
按钮 。 这 是 一 种 简单 的 方法 。 

2. 删除 多 条 记录 


首先 ， 单 击 要 删除 的 第 一 条 记录 左边 的 记录 选 定 器 选择 该 记录 ， 然 后 拖 动 鼠标 向 下 移 
动 ， 直 至 选择 删除 的 其 他 记录 。 右 击 ， 在 弹出 的 快捷 菜单 中 选择 【删除 记录 】 命令， 或 直 
接 按 Delete 键 , 此 时 系统 将 弹出 删除 确认 对 话 框 , 提示 所 要 删除 的 记录 数 , 如 图 4.20 所 示 。 
单 击 【 是 】 按 钮 ， 删 除 所 选择 的 多 条 记录 。 


您 正 礁 备 盟 除 2 条 记录 
个 miki 
GD zw | 


图 4.19 删除 确认 对 话 框 (1) 图 4.20 ”删除 确认 对 话 框 (2) 
一 般 来 说 ， 只 能 删除 连续 的 多 条 记录 ， 而 无 法 同时 删除 非 连续 的 多 条 记录 。 
4.3.3 ”数据 表 中 记录 的 修改 


在 Access 数据 库 中 ， 修 改 数据 表 中 的 记录 非常 简单 。 由 于 数据 表 的 浏览 窗口 本 身 就 是 
一 个 全 屏幕 编辑 器 ， 只 需 将 光标 移 到 所 要 修改 的 数据 处 ， 即 可 修改 数据 。 

值得 注意 的 是 ， 在 Access 数据 库 ， 修 改 记录 的 操作 实质 上 是 执行 了 以 下 两 步 操 作 。 

(1) 删除 原 有 记录 。 

(2) 将 修改 后 的 记录 作为 一 条 新 记录 添加 至 原 记录 的 所 在 行 。 

因此 ， 在 修改 记录 时 ， 同 样 需要 注意 添加 记录 时 的 三 点 事项 (参见 4.3.1 节 )。 


4.4 数据 库 查询 语言 


4.3 节 中 介绍 的 对 数据 的 操作 都 是 在 数据 库 的 数据 表 浏 览 窗 口中 进行 的 。 但 在 实际 的 编 
程 应 用 中 ， 很 少 直接 在 数据 库 中 进行 操作 ， 更 多 的 是 通过 数据 库 查询 语言 (SQL 语言 ) 来 执 
行 对 数据 的 操作 。 

SQL(Structured Query Language， 结 构 化 查询 语言 ) 是 一 种 在 关系 数据 库 中 的 定义 和 操 
纵 的 语言 。SQL 语言 结构 简洁 、 功 能 强大 ， 且 简单 易学 。 目 前 ， 无 论 是 Oracle、Sybase、 
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SQL Server 等 大 型 的 数据 库 管 理 系统 ,还 是 Microsoft Access、Visual Foxpro、PowerBuilder 
等 计算 机 上 常用 的 数据 库 开发 系统 ， 都 支持 SQL 语言 。 掌 握 好 SQL 语言 ， 对 于 ASPNET 


编程 是 非常 重要 的 。 
在 实际 编程 应 用 中 ， 可 以 通过 SQL 来 执行 以 下 任务 。 
e ”查询 数据 表 中 的 记录 。 

在 数据 表 中 添加 记录 。 

在 数据 表 中 修改 记录 。 

在 数据 表 中 删除 记录 。 

创建 、 修 改 和 删除 数据 表 对 象 。 

保证 数据 库 的 一 致 性 和 完整 性 。 

e@ 控制 对 数据 和 数据 对 象 的 存 取 。 


其 中 ， 前 面 4 条 是 在 编程 应 用 中 使 用 最 多 的 。 下 面 ， 分 别 介绍 SQL 语言 在 这 4 个 方面 


的 具体 应 用 。 
4.4.1 查询 记录 


在 SQL 语言 中 ，SELECT 语句 主要 用 来 查询 数据 库 中 的 记录 。 


1. SELECT 语句 的 基本 语法 
SELECT 列 名 FROM 表 名 


WHERE 查询 条 件 
ORDER BY 排序 列 [ASC/DESC] 


2. 注解 


列 名 是 指 从 FROM 关键 字 后 所 指定 的 表 中 提取 的 列 ， 列 名 可 以 为 多 个 ， 用 逗号 分 隔 ; 
列 名 也 可 使 用 “*” 来 代替 ， 表 示 选 择 指定 表 中 的 所 有 列 ( 按 它们 在 表 定 义 中 的 顺序 进行 


排列 )。 


表 名 是 指 要 从 中 获取 记录 的 所 在 的 表 ， 表 名 可 以 为 多 个 ， 用 逗号 分 隔 。 
查询 条 件 是 用 来 对 查询 出 来 的 记录 进行 过 滤 ， 如 果 表 名 仅 有 一 个 ， 则 查询 条 件 通常 是 


关联 


排序 列 是 指 对 查询 出 来 的 记录 结果 进行 排序 的 依据 , 其 后 使 月 


其 后 使 用 关键 字 DESC， 表 示 降 序 。 
3. 使 用 技巧 


对 其 中 单个 字段 的 值 进 行 判断 ， 如 果 表 名 有 多 个 ， 则 查询 条 件 一 般 还 会 包含 多 个 数据 表 的 


关键 字 ASC, 表示 升序 ; 


在 相应 的 列 名 后 接 AS 子 句 可 为 该 列 指定 别名 ， 别 名 将 显示 在 查询 结果 中 ， 蔡 代 原 有 


的 列 名 。 
在 相应 的 表 名 后 接 AS 子 句 可 为 表 的 名 称 指定 别名 。 


在 列 名 前 可 使 用 关键 字 ALL/DISTINCT 来 表示 是 选取 重复 记录 的 全 部 还 是 其 中 的 一 


条 ， 默 认 值 为 ALL。 


可 在 关键 字 SELECT 和 列 名 之 间 通 过 TOP N 来 限制 返回 记录 结果 的 行 数 ， 其 中 N 表 
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示 所 要 返回 的 记录 数 。 

在 列 名 后 使 用 INTO+ 表 名 ， 可 创建 一 个 新 表 ， 并 同时 将 查询 结果 插入 到 新 表 中 ; 新 表 
的 字段 将 与 查询 结果 中 的 字段 一 致 。 

在 WHERE 子 句 后 可 通过 GROUP BY + 列 名 ， 来 对 查询 结果 按 列 名 进行 分 组 ， 并 可 使 
HAVING 子 句 对 分 组 后 利用 聚合 函数 求 得 的 值 进行 条 件 判断 。 

常用 的 聚合 函数 包括 COUNT( 取 记录 数 )、SUM( 求 和 )、AVG( 求 平均 值 )、MAX( 求 最 
大 值 )、MIN( 求 最 小 值 )。 其 中 ，SUM 和 AVG 仅 针对 数字 列 。 

4. 相关 实例 


为 了 说 明 SQL 语句 的 具体 使 用 ， 创 建 了 两 个 示例 数据 表 : AddrBook 和 MyFriend， 其 
中 数据 表 AddrBook 表示 地 址 短信 息 ， 其 各 字段 的 具体 含义 见 表 4.2。 


表 4.2 数据 表 AddrBook 的 字段 含义 


字段 名 相关 描述 

ID 表示 联系 人 的 编号 

Name 表示 联系 人 姓名 

Birth 表示 联系 人 的 出 生日 期 

Sex 表示 联系 人 的 性 别 

Tel 表示 联系 人 的 联系 电话 

Addr 表示 联系 人 的 联系 地 址 

Memo 表示 联系 人 的 备注 信息 


数据 表 AddrBook 的 数据 如 图 4.21 所 示 。 


Tel aa 
1978-08-11 a (010)85478955 中国 北京 这 人 


1975-12-03 女 0731)6805176 湖南 长 沙 这 是 备注 信息 
1978-01-01 男 13055175549 湖南 | 


4.21 数据 表 AddrBook 中 的 数据 
数据 表 MyFriend 表示 好 友信 息 ， 其 各 字段 含义 见 表 4.3。 
表 4.3 数据 表 MyFriend 的 字段 含义 


字段 名 
ID 


相关 描述 
表示 好 友 的 编号 ， 该 字段 与 数据 表 AddrBook 中 的 外 字段 相关 联 
表示 与 好 友 认识 的 时 间 


RSDate 


数据 表 MyFriend 中 的 数据 如 图 4.22 所 示 。 
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图 4.22 数据 表 MyFriend 中 的 数据 


示例 数据 有 了 ， 但 如 何在 Access 数据 库 中 测试 SQL 语句 的 执行 呢 ? 可 以 通过 Access 
数据 库 中 的 查询 对 象 来 实现 ， 其 具体 操作 如 下 。 
首先 ， 在 数据 库 窗口 左边 的 对 象 一 栏 中 ， 选 择 【 查 询 】 命 令 ， 如 图 4.23 所 示 。 


Ac 
名 芒 回 | 号 区 夭 |Y 电 配 久 | 呈 | 到 -| 哆 -| 狼 | 村 | 虽 和 -| 四 -| 
| 加 文 # 吕 _ 纺 各 日 视图 W) 插入 D 工具 D 窗口 w) 帮助 由 


ja 
图 4.23 【查询 】 对 象 窗口 
在 【查询 】 对 象 窗口 中 ， 提 供 了 【在 设计 视图 中 创建 查询 】 和 【使 用 向 导 创建 查询 】 


两 种 方式 来 创建 查询 ， 这 里 选择 前 者 。 双 击 【 在 设计 视图 中 创建 查询 】， 系 统 将 打开 查询 
窗口 ， 如 图 4.24 所 示 。 


文件 (E) 蝙 辑 (E) 视力 (V) 插入 (D 查询 Q) 工具 (D 窗口 (Ww) 帮助 (H) 
有 加 -| ! | 甸 工 | 


4.24 ”查询 窗口 


单 击 窗口 工具 栏 最 左 侧 的 号 按钮 ， 在 打开 的 下 拉 菜 单 中 ， 选 择 【SQL 视图 】 命令， 
即 可 显示 SQL 查询 窗口 ， 如 图 4.25 所 示 。 
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it Access - [查询 1: 迁 畸 查 淘 ] 
| 加 文件 中 闹 日 视图 W) 其 XD 查 注 0) 工具 ID 窗口 (w) 帮助 t =l@lzl 
| 这 -| 日 | 全 区 允 |% 宪 电光 ||| 昌 "|! | 全 | 


RE 


训话 Frrr 吓 广 


4.25 SQL 查询 窗口 


在 SQL 查询 窗口 下 方 的 文本 输入 框 中 ， 直 接 输入 SQL 语句 ， 单 击 工具 栏 中 的 【执行 】 
按钮 硅 ， 即 可 查看 查询 结果 。 对 于 后 面 所 要 提 到 的 用 于 添加 、 删 除 和 修改 记录 的 SQL 语句 ， 
均 可 使 用 此 方法 进行 测试 ， 对 于 测试 结果 则 可 打开 相应 数据 表 的 浏览 窗口 进行 查看 。 

接 下 来 ， 介 绍 一 些 典型 的 SELECT 语句 示例 。 

例 : 查询 所 有 的 联系 人 信息 ， 并 按 姓名 进行 排序 。 


Select * From RddrBook Order BY Name 


查询 结果 如 图 4.26 所 示 。 


Birth 

1975-12-03 i CE ET 
1978-01-01 男 13055175549 湖南 浏阳 

1978-08-11 男 (010)85478955 “中 国 北京 这 也 是 备注 信息 


上 | wj**| 共有 记录 数 : 3 


图 4.26 ”查询 结果 (1) 
例 : 查询 1976 年 以 后 出 生 的 所 有 联系 人 信息 ， 并 按 出 生日 期 进行 排序 。 


Select * From AddrBook where birth >=#1976-1-1# Order By birth 


查询 结果 如 图 4.27 所 示 。 


sl el el 研一] 下 下 到 其 沁 


4.27 ”查询 结果 (2) 
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例 : 查询 好 友 的 姓名 、 出 生日 期 、 联 系 电话 、 联 系 地 址 及 认识 时 间 ， 并 按 出 生日 期 降 
序 排序 。 


Select name,birth,tel,addr,rsdate 
From AddrBook,MyFriend 
where AddrBook.id=MyFriend.id order by birth desc 


查询 结果 如 图 4.28 所 示 。 


查询 1: 选 择 查 鹿 ] 


Dirth 


1978-08-11 D10)85478955 ”中 国 北京 
1975-12-03 (D731)8805178 “湖南 长 沙 


上 | | | 共有 记录 数 : 2 


图 4.28 查询 结果 (3) 
例 : 查询 不 属于 好 友 的 联系 人 信息 。 


Select * From RddrBook Where id not in (Select id From MyFriend) Order By 
Name 


查询 结果 如 图 4.29 所 示 。 


[查询 1: 选择 查询 ] 
J 吕 文件 EE 编 纺 (E) 视 BW) 白 入 (1) 格式 (0) 记录 (R) 工具 窗口) 帮助) 
| 让 -| 日 | 怠 己 入 | 用 | 品 | 凡 | 外 对 及 本 了 | 的 | 以 | 加 少 - 


Tel 
13055175549 


图 4.29 查询 结果 (4) 
提示 : 请 特别 注意 在 此 SQL 语句 中 Select 于 多 的 上 用 
4.4.2 ”添加 记录 


在 SQL 语言 中 ，INSERT 语句 主要 用 来 向 数据 库 中 添加 记录 。 
1. INSERT 语句 的 基本 语法 


INSERT INTO 表 名 [ ( 列 名 ) ] 
VALUE ( 列 值 ) 


2. 注解 
表 名 是 指 要 插入 记录 的 表 ; 表 名 仅 能 为 一 个 ， 不 可 以 为 多 个 。 
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列 名 表示 要 插入 记录 的 列 ， 可 为 多 个 列 ， 用 逗号 分 隔 ;， 列 名 可 以 忽略 ， 此 时 表示 所 有 
插入 表 的 所 有 列 均 需 插入 数据 ， 除 非 该 列 允许 空 QNULL) 值 或 有 指定 的 默认 值 。 

列 值 表示 所 要 插入 的 数据 ;如 果 显 示 地 指定 了 列 名 ， 则 列 值 必须 与 其 一 一 对 应 ， 其 顺 
序 也 应 与 列 名 的 顺序 一 致 ， 如 果 省 略 了 列 名 ， 则 列 值 的 顺序 应 与 插入 的 表 所 定义 的 结构 中 
的 列 的 顺序 一 致 。 

3. 使 用 技巧 

使 用 关键 字 VALUE， 一 次 性 只 能 向 数据 表 中 插入 一 条 记录 ; 但 是 ， 用 户 可 以 使 用 
SELECT 子 句 来 蔡 代 VALUE ( 列 值 ), 这 样 可 以 将 SELECT 子 句 所 返回 的 记录 一 次 性 全 部 插 
入 到 指定 的 数据 表 中 。 

当 只 为 表 中 的 几 个 列 指定 值 时 ， 对 没有 指定 值 的 列 将 存在 以 下 4 种 情况 。 

(1) 如 果 该 列 设置 了 默认 值 ， 则 将 插入 默认 值 ; 

(2) 如 果 该 列 的 数据 类 型 为 自动 编号 ， 则 将 插入 系统 自动 生成 的 一 个 数值 ; 

(3) 如 果 该 列 的 【 必 填 字段 】 属 性 设置 为 【和 否 】， 则 将 插入 NULL 值 ; 

(4) ”如果 该 列 的 【 必 填 字段 】 属 性 设置 为 【是 】， 且 不 存在 默认 值 ， 则 系统 将 提示 错 

误 信息 ， 无 法 插入 该 行 。 
4. 相关 实例 
例 : 向 AddrBook 数据 表 中 新 增 一 条 记录 。 


INSERT INTO AddrBook (Name,Birth,Sex,Tel,Addr,Memo) 
VALUES (" 陈 剑 "，#1980-12-3#，" 男 ","13607491111", "湖南 省 长 沙市 高 新 开发 区 "” ，" 这 
是 新 加 的 记录 ") 


提示 : 在 插入 列 值 时 ， 对 于 文本 型 数据 ， 其 列 值 需要 使 用 单 引 号 括 起 来 ; 对 于 数字 型 数据 ， 
其 列 值 不 需要 单 引号 ; 而 对 于 日 期 /时 间 型 ， 其 列 值 需 要 使 用 符号 “#” 括 起 来 。 


例 : 将 不 属于 好 友 的 联系 人 全 部 变 为 好 友 ， 即 全 部 添加 至 MyFriend 数据 表 中 ， 其 认识 
日 期 设置 为 2006 年 1 月 1 日 。 


INSERT INTO MyFriend (ID,RSDATE) 
SELECT ID,#2006-1-1# FROM AddrBook WHERE ID NOT IN (SELECT ID FROM MyFriend) 


4.4.3 修改 记录 
在 SQL 语言 中 ，UPDATE 语句 主要 用 来 修改 数据 库 中 的 记录 。 
1. UPDATE 语句 的 基本 语法 


UPDATE 表 名 
SET 列 名 = 表达 式 
WHERE 查询 条 件 


2. 注解 
表 名 是 指 包 含 了 要 更 新 的 列 的 数据 表 。 


。87 。 


。88 。 


Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


“ 列 名 = 表达 式 ” 表 示 使 用 表达 式 的 值 来 对 列 名 所 指定 的 列 进行 更 新 ; 可 以 存在 多 个 “ 列 


名 = 表达 式 ”， 同 时 对 多 个 列 进行 更 新 ， 用 逗号 分 隔 。 


查询 条 件 用 于 过 滤 所 要 更 新 的 记录 ; 如 果 没 有 查询 条 件 ， 则 表 中 的 所 有 记录 均 将 被 


更 新 。 


3. 使 用 技巧 

可 以 使 用 多 个 表 名 ， 来 指定 从 一 个 以 上 的 表 中 进行 查询 ， 从 而 指定 要 更 新 的 记录 。 

4. 相关 实例 

例 : 将 AddrBook 数据 表 中 的 姓名 为 “ 张 三 ” 记 录 的 备注 字段 清空 ， 即 设置 为 空 字 


符 串 。 


UPDATE RddrBook SET Memo=" WHERE Name=' 张 三 ' 


例 : 将 认识 日 期 在 2006 年 1 月 1 日 以 后 的 所 有 联系 人 的 备注 信息 更 新 为 “新 朋友 ”。 


UPDATE AddrBook,MyFriend 
SET Memo=' 新 朋友 ' 
WHERE rsdate>=#2006-1-1# AND AddrBook.id=MyFriend.id 


4.4.4 删除 记录 


在 SQL 语言 中 ，DELETE 语句 主要 用 来 删除 数据 库 中 指定 的 记录 。 
1. DELETE 语句 的 基本 语法 


DELETE FROM 表 名 
WHERE 查询 条 件 


2. 注解 

表 名 是 指 包含 了 要 删除 的 记录 的 数据 表 ， 可 以 指定 多 个 表 名 ， 用 逗号 分 隔 。 
查询 条 件 用 于 过 滤 所 要 删除 的 记录 ; 如 果 没 有 查询 条 件 , 则 表 中 的 所 有 记录 均 将 被 删除 。 
3. 使 用 技巧 

如 果 在 FROM 关键 字 后 指定 了 多 个 表 名 , 则 必须 在 DELETE 关键 字 后 指定 需要 删除 记 


录 的 是 其 中 哪个 表 。 
4. 相关 实例 
例 : 将 AddrBook 数据 表 中 姓名 为 “ 张 三 ” 的 记录 删除 。 


DELETE FROM AddrBook WHERE Name=' 张 三 ' 


例 : 删除 认识 日 期 为 2006 年 1 月 1 日 的 所 有 联系 人 信息 。 


DELETE AddrBook.* FROM AddrBook INNER JOIN MyFriend ON 
AddrBook.id=MyFriend.id WHERE Rsdate=#2006-01-01# 
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4.5 习 题 


(1) 练习 Access 2000 数据 库 及 数据 表 的 创建 方法 。 
(2) 练习 基本 的 SQL 语句 的 语法 及 使 用 , 包括 SELECT 语句 、INSERT 语句 、UPDATE 
语句 及 DELETE 语句 等 。 
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在 前 面 4 章 中 ,介绍 了 Dreamweaver 8 和 数据 库 的 相关 基础 知识 .本 章 主要 介绍 VB.NET 
的 语言 基础 以 及 ASP.NET 的 网 页 基本 结构 。 


5.1 VB.NET 语言 基础 


在 创建 ASP.NET 页 面 时 ， 可 以 使 用 NET 兼容 的 脚本 语言 来 编写 服务 器 端 代码 ， 如 
VB.NET、C# 等 。VB 语言 和 VBScript 脚本 语言 的 普及 ， 使 得 VB.NET 也 被 众多 ASPNET 
程序 员 作为 服务 器 端 语言 。 


5.1.1 VB.NET 概述 


VB.NET 是 Microsoft 推出 的 .NET 框架 中 的 一 个 重要 组 成 部 分 , 它 也 是 Visual Basic( 简 
写 为 VB) 的 最 新 版 本 。 与 VB 相 比 ，VB.NET 在 数据 类 型 、 基 本 语法 、 程 序 结构 等 方面 均 
有 很 多 相似 之 处 。 但 作为 .NET 框架 的 重要 成 员 ，VB.NET 在 底层 架构 上 有 着 明显 的 改进 ， 
如 继承 、 重 载 、 封 装 、 接 口 、 结 构 化 的 异常 处 理 等 。 特 别 是 对 继承 的 实现 ， 使 得 在 VB 6.0 
中 部 分 的 对 面向 对 象 的 支持 转变 为 彻底 的 面向 对 象 ， 也 使 其 成 为 一 种 真正 的 面向 对 象 的 开 
发 语言 。 

继承 是 面向 对 象 系统 中 的 一 个 重要 概念 ， 一 门 语言 是 否 具 有 继承 性 常常 被 作为 判断 面 
向 对 象 语言 的 关键 标准 。 实 际 上 ， 继 承 所 表达 的 是 一 种 类 的 相交 关系 ， 它 使 得 某 类 可 以 继 
承 另 一 类 的 特征 和 能 力 。 从 对 象 的 角度 上 来 说 ， 如 果 一 个 对 象 能 够 获得 另外 一 个 对 象 的 接 
口 和 方法 , 并 且 可 以 扩展 这 些 接口 和 方法 , 就 称 这 个 对 象 继 承 了 另 一 个 对 象 。 对 于 VB.NET 
来 说 ,在 继承 关系 中 ， 一 种 类 (派生 类 ) 从 另 一 种 类 ( 基 类 ) 派 生 ， 派 生 类 的 声明 空间 隐 式 地 包 
含 了 基 类 的 所 有 可 访问 的 非 构造 函数 类 型 成 员 。VB.NET 中 的 所 有 类 在 默认 情况 下 都 是 可 
以 继承 的 。 

在 VB.NET 中 ， 实 现 了 对 对 象 的 封装 。 从 字面 上 来 说 ， 所 谓 封装 是 指 将 某 事物 包围 起 
来 ， 使 外 界 不 知道 里 面 的 实际 内 容 ， 而 仅仅 知道 其 外 在 的 表现 形式 。 在 程序 设计 中 ， 封 装 
的 意思 就 是 将 一 系列 的 函数 和 过 程 进行 包装 ， 然 后 提供 相应 的 接口 供 其 他 程序 进行 调用 。 
而 对 于 接口 里 面 各 函数 和 过 程 的 代码 ， 外 界 程 序 不 需要 了 解 ， 也 无 法 了 解 。 这 样 ， 既 提高 
了 程序 的 方便 、 灵 活 调用 ， 又 保证 了 程序 的 安全 性 。 

重 载 也 是 VB.NET 中 的 一 个 重要 功能 。 重 载 的 含义 是 指 通过 为 函数 或 运算 符 创建 附加 
定义 而 使 它们 的 名 字 可 以 重 载 。 也 就 是 说 ， 相 同名 字 的 函数 或 运算 符 在 不 同 的 场合 可 以 表 
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现 出 不 同 的 行为 。 这 也 就 意味 着 ， 使 用 重 载 特性 ， 可 以 允许 具有 不 同 的 数据 类 型 的 方法 、 
属性 或 过 程 使 用 相同 的 名 称 ， 而 执行 不 同 的 程序 ， 从 而 为 程序 的 编写 和 调用 带 来 极 大 的 方 
便 ， 而 这 在 Visual Basic 6 中 是 根本 不 可 能 实现 的 。 

此 外 ， 在 异常 处 理 方面 ，VB.NET 采用 了 结构 化 的 异常 处 理 。 在 Visual Basic 6 中 ， 通 
常 采用 “ON ERROR GOTO” 语 句 来 处 理 错 误 的 出 现 。 但 在 VB.NET 中 ， 对 错误 的 处 理 采 
用 Try Catch .Finally.，End Try 语句 来 实现 。 该 语句 可 以 针对 所 出 现 的 错误 进行 具体 的 判 
断 ， 并 执行 相应 的 操作 。 这 种 结构 化 的 处 理 ， 可 以 很 好 地 控制 错误 的 出 现 ， 而 不 会 轻易 导 
致 程 序 月 总。 

总 之 ， 相 对 于 Visual Basic 6 来 说 ，VB.NET 是 一 种 更 为 成 熟 且 功 能 更 为 强大 的 编程 语 
言 ， 相 信 它 的 使 用 会 给 用 户 在 ASP.NET 的 编程 中 带 来 无 限 的 乐趣 。 


5.1.2 VB.NET 数据 类 型 


作为 一 种 面向 对 象 的 编程 语言 ,VB.NET 中 的 数据 类 型 可 分 为 值 类 型 和 引用 类 型 两 种 。 
其 中 ， 值 类 型 包括 基 元 类 型 、 枚 举 类 型 和 结构 类 型 等 ， 引 用 类 型 包括 类 、 字 符 串 、 标 准 模 
块 、 接 口 、 数 组 和 委托 等 。 这 里 ， 主 要 介绍 值 类 型 中 最 常用 的 基 元 类 型 。 

VB.NET 中 的 基 元 类 型 可 分 为 整数 值 类 型 、 浮 点 值 类 型 、 Boolean 值 类 型 、 Date 值 类 型 、 
Char 值 类 型 、String 数据 类 型 等 几 类 ， 下 面 分 别 详 细 叙 述 。 


1. 整数 值 类 型 


整数 值 类 型 通常 用 来 表示 整数 ， 它 又 包括 Byte、Short、Integer 和 Long 等 几 种 类 型 ， 
见 表 5.1。 


表 5.1 整数 值 类 型 


数据 类 型 
Bye 
shon 
Integer 4 个 字 


-9 223 372036854775 808 一 es 
Long System.Int64 8 个 字 节 
9223372 036 854775 807 


在 使 用 整数 类 型 时 ， 必 须 注意 最 大 与 最 小 取 值 范围 。 在 以 此 类 型 定义 变量 时 ， 应 确定 
该 变量 的 取 值 不 会 超出 相应 整数 类 型 的 取 值 范围 ， 否 则 极 易 导致 溢出 错误 。 

Byte 数据 类 型 可 以 直接 被 转换 为 Short、Integer、Long、Single、Double 或 Decimal 等 
数据 类 型 。 

Short 数据 类 型 可 以 直接 被 转换 为 Integer、Long、Single、Double 或 Decimal 等 数据 类 
型 ， 可 以 通过 在 文本 后 直接 追加 字符 S 来 将 其 强制 转换 成 Short 数据 类 型 。 

Integer 数据 类 型 可 以 直接 被 转换 为 Long、Single、Double 或 Decimal 等 数据 类 型 ， 可 
以 通过 在 文本 后 追加 字符 I 来 将 其 强制 转换 成 Integer 数据 类 型 ， 此外， 在 任何 标识 符 后 追 
加 字符 % 都 可 将 其 强制 转换 成 Integer 数据 类 型 。 


91* 


二 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


Long 数据 类 型 可 以 直接 被 转换 为 Single、Double 或 Decimal 等 数据 类 型 ， 可 以 通过 在 
文本 后 追加 字符 工 来 将 其 强制 转换 成 Long 数据 类 型 ; 此 外 , 在 任何 标识 符 后 追加 字符 “&” 
均 可 将 其 强制 转换 成 Long 数据 类 型 。 

整数 类 型 的 默认 值 均 为 0。 


2. 浮 点 值 类 型 
浮 点 值 类 型 通常 用 来 表示 小 数 , 它 包括 Single、Double 和 Decimal 三 种 类 型 ， 见 表 5.2。 
表 5.2 浮 点 值 类 型 


数据 类 型 映射 结构 取 值 范围 占用 空间 
负 值 取 值 范围 为 : 
SE ee -3.4028 23 5E+38~-1.401 298E-45 5 
正 值 取 值 范围 为 : 


1.401 298E-45~3.402 823 5E+38 
负 值 取 值 范围 为 : 

-1.797 693 134 862 315 70E+308 一 
Double System.Double -4.940 656 458 412 465 44E-324 8 个 字 节 
正 值 取 值 范围 为 4.940 656 458 412 465 44E-324 一 
1.797 693 134 862 315 70E+308 

不 带 小 数 点 的 数 的 取 值 范围 为 0 一 +/-79 228 162 
514 264 337 593 543 950 335 

带 28 位 小 数 的 数 的 取 值 范 围 为 : 

0 一 +/-7.922 816 251 426 433 759 354 395 033 5 

最 小 非 零 数 为 : 

+/-0.000 000 000 000 000 000 000 000 (+/-1E-28) 


Single 数据 类 型 可 以 直接 被 转换 为 Double 或 Decimal 数据 类 型 ， 通 过 在 文本 后 追加 字 
符 F 可 将 其 强制 转换 成 Single 数据 类 型 ， 此 外 ， 在 任何 标识 符 后 追加 字符 “!” 都 可 将 其 强 
制 转 换 成 Single 数据 类 型 。 

Double 数据 类 型 可 以 直接 被 转换 为 Decimal 数据 类 型 ， 通 过 在 文本 后 追加 字符 R 可 将 
其 强制 转换 成 Double 数据 类 型 ， 此 外 ， 在 任何 标识 符 后 追加 字符 “#” 都 可 将 其 强制 转换 
成 Double 数据 类 型 。 

与 Single 和 Double 两 种 数据 类 型 不 同 的 是 ，Decimal 是 定点 型 ， 它 是 用 来 替代 原 VB 6 
中 的 Currency 数据 类 型 的 ; 在 文本 后 追加 字符 D 可 将 其 强制 转换 为 Decimal 数据 类 型 ， 此 
外 ， 在 任何 标识 符 后 追加 字符 “@” 都 可 将 其 强制 转换 为 Decimal 数据 类 型 。 

浮 点 类 型 的 默认 值 与 文本 “0” 等 效 。 

3. Boolean 值 类 型 


Boolean 值 类 型 通常 用 于 表示 关系 运算 或 逻辑 运算 的 结果 ， 其 取 值 为 True 或 False。 
Boolean 值 类 型 占 2 个 字 节 ， 其 对 应 的 映射 结构 为 System.Boolean。 


Decimal System.Decimal 16 个 字 节 
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在 将 数据 值 数据 类 型 转换 为 Boolean 类 型 时 ，0 将 被 转换 为 False， 而 其 他 非 零 值 将 会 
转换 为 1。 但 是 ， 将 Boolean 值 转换 为 数值 类 型 时 ，False 将 被 转换 为 0， 而 True 将 被 转换 
汰 -ls 

Boolean 类 型 的 默认 值 等 于 False。 

4. Date 值 类 型 


Date 值 类 型 通常 用 于 表示 日 期 或 时 间 , 其 取 值 范围 为 1 年 1 月 1 日 到 9999 年 12 月 31 
日 的 日 期 以 及 从 凌晨 0:00:00 到 晚上 11:59:59 的 时 间 。 

Date 值 类 型 占 8 个 字 节 ， 其 对 应 的 映射 结构 为 System.DateTime。 

一 般 来 说 ，Date 类 型 的 数据 必须 写 在 两 个 “#” 之 间 ， 如 “# January 1,2006#”， 而 日 
期 和 时 间 的 显示 将 取决 于 计算 机 的 相关 区 域 设置 (此 操作 可 在 【控制 面板 】| 【区域 选项 】 中 
的 【日 期 】 和 【时 间 ] 两 个 选项 卡 中 进行 )。 

Date 类 型 的 默认 值 等 于 #01/01/0001 12:00:00AM#。 


5. Char 值 类 型 


Char 值 类 型 通常 用 于 表示 单个 的 Unicode 字符 , 其 取 值 范围 为 0~65 535, 其 中 每 个 数 
字 均 代表 一 个 Unicode 字符 。 

Char 值 类 型 占 2 个 字 节 ， 其 对 应 的 映射 结构 为 System.Char。 

不 能 直接 在 Char 数据 类 型 和 数值 类 型 之 间 进行 转换 , 但 可 以 使 用 AscW 和 ChrW 函数 
来 执行 转换 操作 。 

通过 在 单字 符 字符 串 文本 之 后 附加 字符 C， 可 将 其 强制 转换 为 Char 数据 类 型 。 

Char 类 型 的 默认 值 等 于 ChrW(0)。 


6. String 数据 类 型 


String 数据 类 型 通常 用 来 表示 字符 串 数据 , 它 由 一 系列 的 Unicode 字符 组 成 , 一 个 字符 
串 中 可 以 存储 将 近 20 亿 (220) 个 Unicode 字符 。 

String 数据 类 型 占 16 个 字 节 ， 其 对 应 的 映射 结构 为 System.String。 

通过 在 任何 标识 符 后 追加 字符 “$” 可 将 其 强制 转换 成 String 数据 类 型 。 

String 数据 类 型 的 默认 值 为 空 引用 。 


5.1.3 VB.NET 变量 与 常量 


变量 ， 是 指 用 来 存储 在 程序 运行 过 程 中 所 出 现 的 一 些 临时 数据 的 内 存单 元 。 在 程序 中 
只 需 通过 语句 操纵 变量 ， 即 可 操纵 该 变量 所 对 应 的 内 存单 元 中 的 数据 。 

在 VB.NET 中 ,依据 声明 的 级 别 和 范围 ， 变 量 可 分 为 局 部 变量 、 模 块 变量 、 共 享 变量 、 
实例 变量 、 块 级 变量 等 。 

局 部 变量 是 指 在 过 程 内 部 所 声明 的 变量 ， 其 有 效 范围 仅 在 声明 它 的 过 程 中 。 

模块 变量 是 指 在 模块 级 声明 的 ， 位 于 模块 内 部 但 不 在 该 模块 的 任何 过 程 内 的 变量 ， 其 
有 效 范 围 是 在 其 所 在 模块 的 整个 命名 空间 。 

共享 变量 和 实例 变量 均 是 在 类 或 结构 中 所 定义 的 非 局 部 变量 ， 其 有 效 范 围 在 声明 它 的 
类 或 结构 中 。 如 果 通 过 关键 字 Shared 来 声明 ， 则 该 变量 为 共享 变量 ， 和 否则 为 实例 变量 。 对 
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于 共享 变量 ， 它 存在 于 由 类 或 结构 的 所 有 实例 所 共享 的 一 个 副本 中 ; 而 对 于 实例 变量 ， 必 
须 为 类 或 结构 的 每 个 实例 单独 创建 该 变量 的 副本 。 

块 级 变量 是 指 在 一 个 块 内 部 所 声明 的 变量 ， 其 有 效 范围 仅 在 其 所 在 的 块 的 内 部 有 效 。 
所 谓 块 ， 是 指 以 End、Else、Loop 或 Next 语句 终止 的 语句 集合 ， 如 For...Next 或 
If...Then...Else...End If 结构 。 

变量 在 使 用 之 前 ， 必 须 对 其 进行 声明 并 赋值 。 变 量 的 声明 使 用 Dim 语句 ， 如 DimI As 
Integer， 该 语句 是 声明 一 个 整 型 变量 。 在 VB 6 中 ， 如 果 在 源 程序 的 最 前 面 添加 一 句 Option 
Explicit on， 则 表示 在 该 文件 中 的 所 有 变量 均 需 要 声明 后 方 可 使 用 。 而 在 VB.NET 中 ,默认 
为 使 用 Option Explicit， 也 就 是 说 对 变量 必须 进行 强制 声明 。 事 实 上 ， 对 变量 进行 声明 是 一 
个 良好 的 编程 习惯 ， 有 助 于 减少 程序 错误 的 发 生 。 

对 于 每 个 变量 ， 均 有 两 个 属性 : 变量 名 和 数据 类 型 。 前 者 ， 是 用 来 在 程序 中 引用 该 变 
量 的 标识 ;后 者 ， 则 代表 了 该 变量 可 存储 的 数据 类 型 。 变 量 名 由 用 户 自行 定义 ， 但 必须 符 
合 一 定 的 规则 ， 其 规则 如 下 。 

e@ ”名 称 不 能 是 VB.NET 中 的 关键 字 ， 如 Double、Char、Sub 等 ; 

名 称 必须 以 字母 或 下 划 线 开头 ， 如 strName，_myVar 等 ; 

名 称 不 能 包含 标点 符号 或 特殊 字符 ， 如 空格 、 斜 本 、 运 算 符 等 
在 同一 个 作用 域内 ， 名 称 必须 是 惟一 的 ; 

名 称 不 能 超过 255 个 字符 。 

在 为 变量 进行 命名 时 ， 养 成 良好 的 命名 习惯 是 非常 重要 的 ， 这 将 有 助 于 代码 更 加 易于 
阅读 和 维护 。 一 个 好 的 命名 风格 ， 应 遵循 以 下 规则 : 数据 类 型 + 标识 名 称 。 其 中 ， 数 据 类 型 
是 指 像 Integer、String 等 数据 类 型 的 小 写 的 三 码 简 写 ， 见 表 5.3。 而 标识 名 称 是 变量 的 主体 ， 
建议 使 用 以 英文 大 小 写 搭配 ， 容 易 记 忆 且 能 代表 变量 用 意 的 名 称 。 


表 5.3 不 同 数据 类 型 的 命名 规则 


数据 类 型 变量 命名 示例 
Byte bytType 
Boolean lams | blnIsTrue 
Integer intAge 
Long lngNumber 
Single sngPrice 
Double dblIncome 
Short shrYear 
Decimal decSalart 
Date datBirth 
Object objCmd 
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变量 的 赋值 有 两 种 方式 ， 一 种 是 在 定义 的 同时 对 其 进行 赋值 ， 如 : 
Dim intMyAge Rs Integer=31 ' 声 明 整 型 变量 intMyRAge， 并 对 其 赋 初 值 31 
另 一 种 是 先 定义 变量 ， 在 随后 的 程序 中 再 对 其 进行 赋值 ， 如 : 


Dim intMyAge Rs Integer ' 声 明 整 型 变量 intMyAge 
intMyAge=100 “对 变量 intMyAge 进行 赋值 


此 外 ， 对 于 变量 来 说 ， 存 在 一 个 生存 周期 ， 即 变量 可 供 使 用 的 那 段 时 间 。 对 于 使 用 关 
局 


键 字 Dim 所 声明 的 局 部 变量 ， 只 在 其 过 程 正在 执行 期 间 存在 ， 当 过 程 终 止 时 ， 其 所 有 的 


部 变量 均 会 消失 ， 值 也 会 丢失 。 但 对 于 使 用 关键 字 Static 所 声明 的 局 部 变量 ， 即 使 过 程 结 


束 ， 其 变量 依然 存在 且 保留 其 值 。 
所 谓 常量 ， 是 用 来 存储 在 整个 应 用 


类 型 、 作 


初 值 ， 且 在 运行 期 间 不 能 修改 ， 如 : 
Dim Const strMyName As String="Hyh" 
这 里 定义 了 一 个 字符 串 常量 strMyName， 其 值 为 Hyh, 该 值 在 程序 运行 期 间 无 法 修改 。 
5.1.4 VB.NET 的 内 置 函数 


程序 的 执行 过 程 中 均 保 持 不 变 的 值 ， 其 命名 规则 、 
范围 均 与 变量 相同 。 使 用 Const 关键 字 可 以 定义 常量 ， 常 量 必须 在 定义 时 赋予 


在 VB.NET 中 提供 了 大 量 的 函数 ， 这 些 函数 有 助 于 我 们 在 程序 中 快捷 实现 一 些 简易 的 
功能 。 依 据 函 数 的 功能 ，VB.NET 中 的 内 置 函数 可 分 为 字符 串 函 数 、 数 学 函数 、 日 期 时 间 


1. 字符 串 函 数 
字符 串 函 数 主 要 包括 针对 字符 串 进行 处 理 的 函数 ， 见 表 5.4。 
表 5.4 字符 串 函数 

函数 名 说 明 示 例 
Asc 获取 字符 串 的 第 一 个 字符 的 ASCII 码 Asc("A")， 返 回 65 
Chr 获取 与 指定 的 ASCII 码 相对 应 的 字符 Chr(65)， 返 回 "A" 
Len 获取 字符 串 的 长 度 Len("ABCD")， 返 回 4 
Trim 删除 字符 串 中 的 所 有 空格 ， 包 括 起 始 和 末尾 空格 “| Trim(" name ")， 返 回 "name" 
Ltrim 删除 字符 串 起 始 的 空格 LTrim(" name "), 返回 "name " 
Rtrim 删除 字符 串 末尾 的 空格 RTrim(" name "), 返回 " name" 
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续 表 
函数 名 说 明 示 例 
Dim strName(2) as String 
strName(0)=" 胡 人 金 " 
, 有 strName(1)=" 张 三 " 
搜寻 字符 串 数组 中 的 指定 字符 串 ， 凡 是 数组 元 素 
strName(2)=" 胡 莹 卜 " 
Filter 中 含有 指定 字符 串 ， 会 将 它们 结合 成 新 的 字符 串 SS 
数组 并 传 回 
retStr=Filter(strName," 胡 ", 
True, CompareMethod. Text) 
返回 数组 :[" 胡 人 金 "," 胡 葛 卜 "] 
Ee Format(0.5,"0.00%") ， 返回 
Format 获取 指定 字符 串 中 所 包含 的 指令 设置 格式 字符 串 0 
Formatcurreney | 区 了 格式 为 金额 型 态 的 表达 式 ， 该 金领 型 态 使 用 pe 
系统 控制 面板 中 所 定义 的 货币 符号 了 
返回 $1,234.56 
Dim DDate As DateTime 
DDate= #3/12/1999# 
FormatDateTime | 获取 格式 化 的 日 期 或 时 间 数 据 retStr= FormatDateTime( 
DDate, dateFormat.LongDate) 
返回 Friday, March 12, 1999 
FormatNumber(1234, 2,, ， 
FormatNumber 获取 格式 化 的 数值 数据 TriState.True) 
返回 1.234.00 
FormatPercent | 获取 转换 为 百分比 格式 的 数值 数据 有 
返回 0.23% 
获取 一 个 字符 在 另 一 个 字符 串 中 的 第 一 个 匹配 | sac wobear ror), 返回 3 
项 的 位 置 
Dim exStr(2) as String 
exStr(0)="aa" 
. 通过 指定 的 分 隔 符 ， 将 字符 串 数组 中 的 项 合并 成 | exExStr(1)="bb" 
Join 本 
个 字符 串 exStr(2)="ce" 
RetStr=Join(exStr,",") 
返回 aa.bb.ce 
Lcase 将 字符 串 转换 为 小 写字 体 Lcase("aBcD")， 返 回 abcd 
Ucase 将 字符 串 转换 为 大 写 Ucase("aBcD")， 返 回 ABCD 
Left 获取 字符 串 从 左边 开始 指定 长 度 的 字符 串 Left("abcdef",3)， 返 回 abc 
Right 获取 字符 串 从 右边 开始 指定 长 度 的 字符 串 Right("abcdef",3")， 返 回 def 
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续 表 
函数 名 说 明 示 例 
. 从 一 个 字符 串 中 返回 包含 从 指定 位 置 开始 、 指 定数 . i 
Mid Mid("abcdef"',3,4)， 返 回 cdef 
量 字符 的 字符 串 
Replace 返回 一 个 字符 串 ， 其 中 的 指定 子 字符 串 已 被 另 一 个 | Replace("abcd","b","e") 
子 字 符 串 所 替换 返回 accd 
StrName="Hu" & Space(2) & 
Space 取得 指定 数量 的 空白 字符 串 "YongHui" 
返回 "Hu YongHui" 
Dim exStr as String="a,b,e" 
, Ss £ a Dim getStr() as String 
Split 通过 指定 的 条 件 字符 串 将 字符 串 分 割 为 字符 串 数组 
GetStr=Split(exStr,",") 
返回 数组 ，["a"."b","e"] 
StrReverse 获取 与 指定 字符 串 中 顺序 相反 的 字符 串 StrReverse("abcd")， 返 回 dcba 
将 代表 数字 的 字符 串 转换 为 数值 型 态 ， 当 遇 到 第 一 
Val 个 无 法 解释 为 数字 、 数 字 修饰 符 、 数 字 标 点 或 空格 | Val("23 45 and 67"), 返回 2345 


2. 数学 函数 


的 字符 时 将 停止 转换 


在 .NET 框架 的 System.Math 类 中 ， 提 供 了 用 于 数学 计算 的 相关 函数 ， 包 括 三 角 函 数 、 
对 数 函 数 及 其 他 常用 数学 函数 ， 见 表 5.5。 


表 5.5 数学 函数 
函数 名 示 例 
Abs 获取 数值 的 绝对 值 Abs(-12)， 返 回 12 
Dim dblRes as Double 
Sin 获取 一 个 角度 的 正弦 值 DblRes=Sin(30*(pi/180)) 
返回 0.5 
2 Cos(pi)， 返 回 -1 
SD Pi 是 Math 类 中 的 常量 ， 表 示 180” 
Dim dblRes as Double 
Tan 取得 某 个 角度 的 正切 值 DblRes=tan(45*(pi/180)) 
返回 1 
获取 包含 角度 的 Double 值 , 该 角度 的 正切 值 是 指 | Dim dblPI as Double 
ee 定 的 数值 。 返 回 值 为 正 ， 表 示 角 度 在 和 轴 的 逆 时 | DblPI=4 * Atan(]) 


针 方向 上 ; 返回 值 为 负 ， 表 示 顺 时 针 角 度 。 将 该 返 | 返 


日 


值 : 3.141 592 653 589 79， 这 


回 值 乘 以 180 再 除 以 pi， 就 可 以 将 弧度 转换 为 度 | 也 就 是 pi 的 值 
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说 明 示 例 


Int(7.56)， 返 回 7 
Int(-8.2)， 返 回 -9 


去 掉 指定 数字 的 小 数 部 分 ， 返 回 整数 部 分 


去 掉 指定 数字 的 小 数 部 分 , 返回 整数 部 分 ; Fix 与 
Int 函数 的 不 同 在 于 , 如 果 指定 参数 为 负数 , 则 Int 
函数 返回 小 于 或 等 于 指定 参数 的 第 一 个 负 整数 ， 

而 Fix 函数 则 返回 大 于 或 等 于 指定 参数 的 第 一 个 


Fix(7.56)， 返 回 7 
Fix(-8.2)， 返 回 -8 


Floor(-1.24)， 返 回 -2 
Floor(2.56)， 返 回 2 


小 于 或 等 于 指定 值 的 最 大 整数 


Log(1)， 返 回 0 
e 的 指定 次 容 ， 该 函数 为 Log 函数 的 反 函 数 | Exp(0)， 返 回 1 


两 个 指定 数字 中 较 大 的 一 个 Max(12,24)， 返 回 24 
两 个 指定 数字 中 较 小 的 一 个 Min(12.24)， 返 回 12 
Round(3.56)， 返 回 4 
最 接近 指定 值 的 数字 Round(3.45,.1)， 返 回 3.4 
Round(3.46,1)， 返 回 3.5 
各 指定 数值 转换 为 八进制 值 Hex(459)， 返 回 713 
指定 数值 转换 为 十 六 进 制 值 Hex(459)， 返 回 1CB 


EC Sign(-123)， 返 回 -1 
判断 数值 内 容 是 正 数 还 是 负数 ， 正 数 返 回 1， 负 
Sign(123)， 返 回 1 


数 返 回 -1， 为 零 则 返回 0 a 
Sign(0)， 返 回 0 


Sqrt 获得 指定 数值 的 平方 根 Sqrt(9)， 返 回 3 
将 数字 转 为 字符 串 后 传 回 : 当 数 值 为 正 数 时 ， 将 | Str(123)， 返 回 “123” 
始终 为 其 前 导 符号 保留 一 个 空 Str(-123)， 返 回 “-123” 


提示 : 要 使 用 数学 函数 ， 需 在 源 代码 的 顶部 添加 以 下 代码 ， 以 便 将 System.Math 命名 空间 
添加 至 项 目 中 。 


<%@ Import NameSpace="System.Math" 和 > 


3. 日 期 时 间 子 数 
在 VB.NET 中 ， 提 供 了 大 量 用 于 对 日 期 和 时 间 进 行 处 理 的 函数 ， 见 表 5.6。 
表 5.6 日 期 时 间 函 数 


函数 名 说 明 示 例 


Now 返回 系统 当前 的 日 期 和 时 间 Now0， 返 回 值 为 2006-9-25 17:32:35 
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续 表 
函数 名 说 明 示 例 
Today 返回 系统 当前 的 日 期 ， 不 含 时 间 Today0， 返 回 2006-9-25 
Year 返回 指定 日 期 的 年 度 Year("2006-9-250)， 返 回 2006 
Month 返回 指定 日 期 的 月 份 Month("2006-9-25")， 返 回 9 
返回 指定 月 份 的 月 份 名 称 ， 该 名 称 
MonthName 不 仅 取决 于 输入 参数 ， 也 取决 于 控 | MonthName(9)， 返 回 “ 九 月 ” 
制 面板 中 指定 的 “区 域 选 项 ”设置 
Day 返回 指定 日 期 的 天 Day("2006-9-25")， 返 回 25 
返回 指定 日 期 是 一 个 星期 的 第 几 | WeekDay("2006-9-25") 
WeekDay . a a 
天 ， 默 认 从 星期 天 算 起 返回 2， 即 星期 一 
ee 指定 一 个 星期 的 第 几 天 参数 ， 返 回 | WeekDayName(2) 
“YW | 其 所 代表 的 星期 名 称 返回 “星期 一 ” 
Hour("2006-9-25 17:32:35" 
Hour 返回 指定 时 间 的 小 时 字段 
返回 17 
Minute("2006-9-25 17:32:35" 
Minute 返回 指定 时 间 的 分 字段 A 
返回 32 
Second("2006-9-25 17:32:35" 
Sooond 返回 指定 时 间 的 秘 字段 ee ) 
返回 35 
DateAdd("d",10,"2006-9-25" 
i 返回 在 指定 日 期 或 时 间 上 添加 指定 a ee a 
ee 时 间 间隔 的 日 期 或 时 间 值 0 Re 
为 2006-10-5 
Dai 计算 两 个 指定 的 日 期 或 时 间 之 间 的 | DateDiff("d","2006-7-2","2006-9-25") 
ee 差 什 计算 两 个 日 期 之 间 相差 的 天 数 , 返回 值 为 85 
获取 指定 的 日 期 或 时 间 中 的 某 个 部 | DatePart("q","2006-9-25") 
DatePart 分 的 值 ， 如 年 、 月 、 日 、 时 、 分 、 计算 该 日 期 所 属 的 季度 ， 返 回 值 为 3， 表 示 
秒 、 季 度 、 星 期 、 周 等 第 三 季度 
DateSerial 交 按 收 的 年 刘 旧 多 于 并 为 目 | 语 s ial(2006.9,25)， 返 回 值 为 2006-9-25 
ateSerlal 2 ， 这 一 
Ce 期 格式 的 数据 
将 接收 的 时 、 分 、 秒 参数 合并 为 时 | TimeSerial(15,20,45)， 返 回 值 为 
TimeSerial 
间 格 式 的 数据 15:20:45 
DateValue("Feb 12,2006")， 返 回 值 为 
DateValue 用 于 将 字符 品 转 变 为 日 期 格式 Ve J 
2006-2-12 
A _、 TimeValue("5:32:35 PM")， 返 回 值 为 
TimaValue 用 于 将 字符 串 转 变 为 时 间 格 式 


17:32:35 


。99 。 


“100。 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


4. 类 型 转换 函数 

在 编程 中 ， 经 常 需要 将 一 些 数据 由 某 种 数据 类 型 转变 成 另 一 种 数据 类 型 ， 这 个 过 程 也 
叫做 类 型 转换 。 在 VB.NET 中 ,就 提供 了 大 量 的 类 型 转换 函数 ， 为 用 户 的 操作 提供 了 便利 ， 
见 表 5.7。 


表 5.7 类 型 转换 函数 


函数 名 说 明 示 例 
将 字符 串 表达 式 或 字符 串 表达 式 转换 为 Boolean 0 
CBool 信 : 当 表达 式 的 信 为 非 零 时 ， 返 回 True: 当 表达 | -10 


mi 
式 的 值 为 零 时 ， 返 回 False CBool(A-B)， 返 回 True 
将 指定 的 数值 转 换 为 字 节 ， 其 参数 必须 为 9~255 | La og sg)， 运 加 多 
el | 四 
i 范围 内 的 一 个 数值 次 


将 指定 的 表达 式 转化 为 字符 类 型 ， 如 果 表 达 式 为 


CChar 字符 串 ， 则 仅 转换 其 第 一 个 字符 ， 表 达 式 的 值 不 | CChar("ABCD")， 返 回 A 
能 为 数字 

a 

CDate 将 指定 的 字符 串 表达 式 转换 为 日 期 类 开 ne 


返回 值 为 :2006-2-15 
CDbl(0.78*26.12)， 返 回 Double 类 
型 的 数值 20.3736 

Dim dblVar as Double 


CDbl 将 指定 的 数值 表达 式 转换 为 Double 类 型 


Dim decVar as Decimal 

dblVar=123 456.012 3 
DecVar=Cdec(dblVar)， 将 Double 
类 型 的 数值 通过 CDec 函数 赋值 给 
Decimal 类 型 变量 

CInt 将 指定 的 数值 表达 式 转 换 为 Integer 类 型 CInt(1 234.56)， 返 回 1234 

CLng 将 指定 的 数值 表达 式 转 换 为 Long 类 型 CLng(34 567.89)， 返 回 34568 

Dim dblVar as Double 

Dim objVar as Object 

dblVar=1.234 567 
objVar=Cobj(dblVar) 

Dim bytVar as Byte 

Dim shrVar as Short 

bytVar=100 

shrVar=Cshort(bytVar) 

CSng 将 指定 的 数值 表达 式 转换 为 Single 类 型 CSng(1.232 156 7)， 返 回 1.232 16 


CDec 将 指定 的 数值 表达 式 转换 为 Decimal 类 型 


CObj 将 指定 的 数值 表达 式 转换 为 Object 类 型 


CShort 将 指定 的 数值 表达 式 转换 为 Short 类 型 
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续 表 
函数 名 说 明 示 例 
将 指定 的 表达 式 转换 为 String 类 型 ， 当 表达 式 为 
Boolean 值 时 ， 返 回 包含 True 或 Flase 的 字符 串 ; 2 
本 CStr(5=5)， 返 回 True 
CStr 当 表达 式 为 日 期 类 型 时 ， 返 回 以 系统 的 短 日 期 格 i 
2 CStr(123.45)， 返 回 123.45 
式 表示 的 Date 值 的 字符 串 ， 当 表达 式 为 数值 时 ， 
返回 表示 该 数字 的 字符 串 
5. 其 他 函数 
除了 以 上 类 型 的 函数 外 ， 在 VB.NET 中 还 有 一 些 经 常 需要 使 用 的 函数 ， 见 表 5.8。 


函数 名 


表 5.8 其 他 函数 


示 例 


UBound 


Tf 


IsArray 


IsDate 


Dim Array1(S) As Integer 

Dim Array2(7,10) As Integer 

Dim highest As Integer 

UBound(Array1)， 返 回 5 

UBound(Array2,1)， 返 回 7 

UBound(Array2,2)， 返 回 10 

Tif(5>4,"Large","Small") 

返回 Large 

Lif(5<4, "Large","Small") 

返回 Small 

Dim MyArray(4) As Integer 

Dim MyStr As String 

IsArray(MyArray)， 返 回 True 
IsArray(MyStr)， 返 回 False 

判断 表达 式 内 容 是 否 为 日 期 /时 间 类 型 , 如 果 是 则 | IsDate("1234")， 返 回 False 


返回 Tme， 反 之 则 为 False IsDate("2006-1-10)， 返 回 Tme 


返回 数组 的 指示 维度 的 最 大 可 用 下 标 


根据 指定 表达 式 的 值 ， 返 回 两 个 对 象 中 的 一 个 


返回 一 个 Boolean 值 ， 指 示 变 量 是 否 为 一 个 数组 


IsNumeric 


判断 表达 式 内 容 是 否 为 数值 类 型 ， 如 果 是 则 返回 | IsNumeric("sdkf)， 返 回 False 
True， 反 之 则 为 False IsNumeric("222")， 返 回 Tme 


5.2 ASP.NET 网 页 基本 结构 


5.2.1 ASP.NET 中 的 代码 块 


代码 块 是 ASPNET 页 面 中 的 一 个 重要 部 分 ， 它 包含 了 实现 页 面 功能 的 关键 代码 。 从 某 
种 程度 上 来 说 ， 可 以 将 代码 块 分 为 代码 声明 块 、 代 码 呈 现 块 以 及 相关 的 页 面 编译 指令 和 命 


名 空间 等 。 
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1. 代码 声明 块 


在 第 1 章 的 上 机 指导 中 , 创建 了 一 个 简单 的 ASPNET 页 面 , 同时 在 页 面 中 添加 了 一 段 
Page_ Load 事件 代码 ， 如 图 5.1 所 示 。 


《W%@ Page Language= YE” ContentType=" text/htm]”“%> 
《IDOCTYPE html PUBLIC “-//W3C//DID XHTIL 1.0 Transitional//EN” 
“http://www. w3. org/TR/xhtml1l/DID/xhtmll-transitional. dtd > 
<html xmlns="http://www. w3. org/1999/xhtnl”> 
<head> 
<meta http-equiv="Content-Type” content="text/html; charset=gb2312” /> 
Kscript runat=" serVer > 
Sub Buttonl_Click (Src As Object, E As EventArgs) 
LblInfo. text=" 您 所 输入 的 是 : ”上 TextBoxl. Text 
End Sub 
/script> 
title) 我 网 第 一 不 ASP. 了 ET 页 面 </tit1le>》 


5.1 代码 声明 块 


此 段 代 码 放置 在 标签 <Script Runat="Server" > 与 标签 </Scripf> 之 间 。 事 实 上 ， 对 于 
ASPNET 中 的 所 有 事件 以 及 自 定 义 的 过 程 和 函数 等 ， 其 代码 均 需 放置 在 <Script 
Runat="Server"> 和 </Scripf> 标 签 对 之 间 ， 这 些 代码 就 是 所 谓 的 代码 声明 块 。 

代码 声明 块 主要 用 于 定义 应 用 程序 中 的 成 员 变 量 、 事 件 处 理 程序 或 用 户 自 定义 的 子 程 
序 和 函数 等 .在 ASPNET 的 <Scripf> 标 签 中 ,Runat 属性 是 不 可 缺少 的 , 且 其 值 必须 为 Server， 
它 表 示 代 码 块 是 在 服务 器 上 运行 的 。 如 果 没 有 设置 Runat 属性 ， 则 ASPNET 将 会 把 这 段 代 
码 看 成 是 客户 端 代 码 ， 并 将 其 直接 发 送 至 浏览 器 进行 显示 ， 而 不 会 去 编译 执行 它 。 

从 理论 上 来 说 ， 代 码 声 明 块 可 以 放置 在 ASP.NET 页 面 中 的 任何 位 置 。 但 是 ， 作 为 一 个 
好 的 习惯 ， 一 般 来 说 应 将 其 与 HIML 代码 尽 可 能 地 分 开 。 这 样 ， 在 对 代码 进行 跟踪 调试 时 
将 会 更 为 方便 ， 同 时 代码 也 显得 更 为 清晰 ， 易 于 维护 。 

2. 代码 呈现 块 

<body> 

<center> 当 天 日 期 : <s=now() .tostring ()%></center> 

</body> 

这 是 一 段 HTML 代码 ， 它 将 在 页 面 上 显示 系统 的 当前 时 间 。 其 中 ，now0 是 ASPNET 
中 内 置 的 时 间 函 数 , 用 于 获取 系统 的 当前 时 间 。 这 段 代码 被 放置 在 标签 <%= 与 标签 %> 之 间 ， 
通常 被 称 为 代码 呈现 块 。 

代码 呈现 块 是 在 页 面 显示 时 执行 的 ， 它 一 般 包 括 两 种 样式 ， 内 联 代码 和 内 联 表达 式 。 
内 联 代码 放置 的 是 一 段 独立 的 用 于 控制 程序 执行 顺序 的 代码 ， 如 开 语句 、While 语句 等 ; 
而 内 联 表达 式 放置 的 是 一 个 表达 式 ， 通 常 以 标签 <%= 和 标签 %> 的 形式 显示 ， 如 上 述 代码 。 

代码 呈现 块 与 代码 声明 块 较为 类 似 ， 甚 至 可 以 将 代码 呈现 块 放置 在 代码 声明 块 中 ， 它 
们 将 以 类 似 的 方式 运行 。 但 两 者 之 间 还 是 存在 一 定 的 差别 。 首 先 ， 代 码 声明 块 将 被 编译 为 
机 器 码 ( 首 先 被 编译 为 MSIL)， 这 使 得 它 比 代码 呈现 块 的 速度 更 高 ， 稳 定性 更 好 。 其 次 ， 两 
者 的 处 理 次 序 不 同 ， 代 码 声明 块 是 在 被 调用 时 方才 执行 ， 而 代码 呈现 块 是 在 页 面 加 载 显 示 
时 便 已 执行 。 此 外 ， 代 码 声 明 块 是 集中 在 一 起 的 ， 而 代码 呈现 块 则 比较 分 散 。 一 般 来 说 ， 


a 
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在 使 用 两 种 代码 形式 均 可 实现 页 面 指定 功能 的 前 提 下 ， 推 荐 使 用 代码 声明 块 。 
需要 注意 的 是 , 在 ASPNET 中 的 代码 呈现 块 中 ,不 能 定义 过 程 和 函数 。 所 有 的 过 程 和 
函数 的 定义 都 必须 放置 在 代码 声明 块 中 ， 而 不 能 放置 在 代码 呈现 块 中 ， 这 一 点 与 ASP 是 不 
同 的 。 
3. 页 面 编 译 指令 
页 面 编译 指令 是 指 当 页 编译 器 在 处 理 ASPNET 页 面 时 所 使 用 的 设置 , 即 指示 ASP.NET 
如 何 处 理 该 页 面 。 当 使 用 页 面 编译 指令 时 ， 一 般 是 将 其 包含 在 文件 的 开头 。 对 于 每 个 页 面 
编译 指令 ， 均 可 包含 一 个 或 多 个 特定 于 该 指令 的 属性 。 
在 51 所 示 的 代码 块 中 ， 第 一 行 代码 为 <%@ Page Language="VB" 
ContentType='"texthtml"%>， 这 就 是 所 谓 的 页 面 编 译 指令 。 
在 ASPNET 中 ， 常 用 的 页 面 编译 指令 包括 @ page 指令 、@Import 指令 、@Implements 
指令 、@Register 指令 、@Assembly 指令 、@OutputCache 指令 以 及 @Reference 指令 等 。 
其 中 , @page 指令 是 最 常用 的 一 个 页 面 编译 指令 , 它 主要 用 于 定义 ASP.NET 页 分 析 器 
和 编译 器 使 用 的 页 特定 属性 。 该 指令 只 能 在 Web 窗 体 页 中 使 用 且 每 个 页 面 文件 只 能 包含 一 
个 @page 指令 。 
@Import 指令 主要 用 于 将 指定 的 命名 空间 显 式 导入 到 ASP.NET 页 中 , 以 便 在 页 面 中 使 
该 命名 空间 所 包含 的 所 有 类 和 接口 。 
@Implements 指令 表示 当前 页 或 用 户 控件 所 指定 的 .NET 框架 接口 。 
@Register 指令 用 于 将 别名 与 命名 空间 及 类 名 关联 起 来 , 以 便 在 自 定义 服务 器 控件 语法 
中 使 用 简明 的 表示 法 。 
@Assembly 指令 用 于 在 编译 过 程 中 将 程序 集 链接 到 当前 页 ， 以 便 程 序 集 的 所 有 类 和 接 
口 都 可 用 在 该 页 中 。 
@OutputCache 指令 表示 以 声明 的 方式 控制 ASP.NET 页 或 页 中 包含 的 用 户 控 件 的 输出 
缓存 策略 。 
@Reference 指令 是 指 以 声明 的 方式 指示 另 一 个 用 户 控件 或 页 源 文件 应 该 被 动态 编译 并 
链接 到 在 其 中 声明 该 指令 的 页 。 
4. 命名 空间 
命名 空间 是 微软 在 .NET 框架 中 新 引入 的 一 个 专业 术语 , 其 作用 是 将 多 个 类 组 成 在 逻辑 
上 相关 的 一 些 单元 ， 以 便 在 .NET 中 进行 引用 。 每 个 命名 空间 均 包 含 了 可 在 程序 中 使 用 的 类 
型 ， 如 类 、 结 构 、 枚 举 、 接 口 等 。 
命名 空间 的 一 个 主要 功能 是 对 相关 类 型 进行 逻辑 分 组 。 例 如 ， 命 名 空间 System.Web 
包含 了 所 有 管理 Web 请 求 的 低级 执行 的 ASP.NET 类 ; 命名 空间 System.IO 包含 了 所 有 用 
来 处 理 输入 /输出 操作 的 类 。 命 名 空间 不 对 类 型 进行 物理 分 组 ， 这 也 是 它 与 过 去 经 常 所 使 用 
的 类 ， 如 DLL 动态 链接 库 、COM 对 象 或 OCX 模块 等 的 主要 区 别 。 
减少 名 称 冲突 是 命名 空间 的 另 一 个 主要 功能 。 事 实 上 ， 在 面向 对 象 的 应 用 中 ， 很 多 人 
可 能 会 使 用 相同 的 类 名 称 ， 而 命名 空间 减少 了 这 种 名 称 冲突 的 可 能 性 。 因 为 在 .NET 中 ， 作 
为 一 个 有 效 的 类 名 称 ， 是 在 命名 空间 的 名 称 上 再 加 上 具体 的 类 的 名 称 。 
对 于 命名 空间 的 引用 ， 是 通过 页 面 编译 指令 @Import 来 完成 的 。 
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5.2.2 ASP.NET 中 的 表单 


表单 (Form) 是 ASPNET 开发 中 的 一 个 重要 组 成 部 分 , 可 以 说 没有 表单 就 没有 ASPNET 
Web 编程 模型 。 表 单 主要 用 于 实现 对 用 户 输入 数据 的 提交 。 在 ASP 中 ， 对 表单 数据 的 提交 
是 将 其 提交 至 指定 的 页 面 中 。 而 对 于 ASPNET，Form 可 以 提交 至 本 身 ， 同 时 ASPNET 模 
型 提供 了 控件 状态 管理 和 PostBack( 回 发 ) 事 件 。 

在 ASPNET 的 Form 中 ， 必 须 包 含 Runat 属性 ， 同 时 其 值 为 Server。 如 果 在 页 面 添 加 
了 一 个 Form， 而 不 含 Runat 属性 ， 则 该 Form 将 会 完全 被 ASPNET 忽略 ， 并 作为 纯粹 单一 
的 HTML 而 直接 呈现 。 

一 般 来 说 ， 在 一 个 ASP.NET 页 面 中 ， 仅 能 包含 一 个 服务 器 端的 Form 标记 ( 即 设置 了 
Runat 属性 为 Server 的 Form)。 如 果 有 多 个 ， 则 页 面 将 会 显示 异常 错误 。 但 事实 上 ， 一 个 
ASPNET 页 面 是 可 以 包含 任意 数量 的 服务 器 端 Form， 只 是 同一 时 间 仅 能 有 一 个 Form 可 见 
并 呈现 。 这 一 点 ， 是 很 多 人 所 不 太 注 意 的 。 比 如 说 ， 在 页 面 上 添加 三 个 带 有 Runat=Server 
属性 的 Form, 但 是 仅 有 一 个 Form 的 Visible 属性 被 设置 为 True。 此 时 ， 可 在 代码 中 通过 设 
置 其 他 Form 的 Visible 属性 , 来 在 页 面 运行 时 动态 改变 当前 所 呈现 的 Fomm。 认识 到 这 一 点 ， 
将 会 对 以 后 的 编程 有 所 帮助 。 


5.2.3 ASP.NET 中 的 服务 器 控件 


在 ASPNET 中 ， 提 供 了 大 量 的 服务 器 控件 供用 户 使 用 ， 掌 握 这 些 控件 的 使 用 是 学 好 
ASP.NET 的 一 个 重要 前 提 。ASP.NET 中 的 服务 器 控件 可 分 为 HTML 服务 器 控件 和 Web 服 
务 器 控件 。 

HTML 服务 器 控件 是 在 HTML 标记 的 基础 上 衍生 出 来 的 控件 , 它 允 许 通过 程序 直接 控 
制 HTML 标记 的 属性 。 这 些 控件 位 于 System.Web.UI.HtmlControls 命名 空间 中 ， 是 
HtmlControl 基 类 中 直接 或 间接 派生 出 来 的 。 

HTML 服务 器 控件 必须 包含 有 “Runat="Server"” 属 性 ， 以 便 ASPNET 能 够 将 其 视 为 
服务 器 控件 进行 分 析 和 处 理 。 此外, HTML 服务 器 控件 还 必须 驻 留 在 具有 “Runat="Server"” 
属性 的 <Form> 标 记 中 。 

表 5.9 列 出 了 常用 的 HTML 服务 器 控件 。 


表 5.9 HTML 服务 器 控件 


控 件 描 述 对 应 的 HTML 标记 
HtmlAnchor 用 于 设置 超级 链接 <a> 
HtmlButton 用 于 创建 普通 按钮 <button> 
HtmlSelect 用 于 创建 下 拉 列 表 <select> 
HtmlTextArea 用 于 创建 多 行文 本 框 <textarea> 
HtmlInputButton 用 于 创建 普通 按钮 <input type="button"> 
HtmlInputCheckBox 用 于 创建 复 选 框 <input type="check"> 
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续 表 
控件 描 述 对 应 的 HTML 标记 
HtmlInputRadioButton 用 于 创建 单 选 按 钮 <input type="radio"> 
HtmlinputText 用 于 创建 文本 输入 杠 
HtmlInputHidden 用 于 创建 隐藏 域 <input type="hidden"> 
HtmlInputImage 用 于 在 页 面 上 显示 图 片 <input type="image"> 
HtmlInputFile 用 于 上 传 文件 <input type="file"> 
HtmlForm 用 于 创建 一 个 表单 容器 <form> 
HtmlImage 用 于 在 页 面 上 显示 图 片 <img> 
HtmlTable 用 于 创建 一 个 表格 <table> 
HtmlTableRow 用 于 创建 表格 的 一 行 <tr> 
HtmlTableCell 用 于 创建 表格 的 一 个 单元 格 <td> 
i 用 于 执行 那些 不 直接 表现 出 来 | 任何 其 他 没有 对 应 控件 的 标记 ， 如 


得 HTML 服务 器 控件 不 具备 任何 抽象 能 力 ， 即 无 法 扩展 其 功能 。 


的 未 知 的 HTML 控件 


<span>、<div> 等 


Wi， 使 
为 此 ， 微 软 推出 了 适用 于 


ASP.NET 的 一 类 新 的 服务 器 控件 ， 这 就 是 Web 服务 器 控件 。 与 HTML 服务 器 控件 相 比 ， 
Web 服务 器 控件 的 功能 更 强大 ， 使 用 更 灵活 。 
Web 服务 器 控件 位 于 System.Web.UI.WebControls 命名 空间 中 ， 是 从 WebControl 基 类 
中 直接 或 间接 派生 出 来 的 ,与 HTML 控件 一 样 , Web 服务 器 控件 必须 包含 “Runat="Server"” 
属性 ， 同 时 Web 服务 器 控件 也 必须 驻 留 在 具有 “Runat="Server"” 属 性 的 <Form> 标 记 中 。 
Web 服务 器 控件 的 语法 与 HTML 服务 器 的 语法 较为 相似 ， 其 主要 的 区 别 在 于 Web 服 
务 器 控件 必须 带 有 标记 前 级 “asp:”， 如 以 下 是 一 个 Text 服务 器 控件 的 声明 : 


<asp:TextBox ID="TextBoxl" Text="" runat="server" ></asp:TextBox> 

前 缀 “asp: ”用 于 将 标记 映射 到 运行 时 组 件 的 命名 空间 , 即 System.Web.UI.WebControls 
命名 空间 ， 而 标记 的 其 余部 分 则 是 运行 时 类 自身 的 名 称 。 

下 面 ， 对 Web 服务 器 控件 按 功 能 进行 分 类 介绍 ， 并 简要 叙述 各 个 控件 的 使 用 、 声 明示 
例 以 及 在 浏览 器 中 的 显示 效果 。 

1. 文本 显示 控件 

文本 显示 控件 主要 用 于 在 页 面 上 显示 静态 的 文本 ， 它 包括 Label 控件 和 Literal 控件 。 

1) ”Label 控件 

Label 控件 可 以 通过 编程 来 动态 地 控制 文本 的 显示 内 容 , 一 般 在 当 希 望 程序 运行 时 动态 
改变 页 面 中 的 文本 时 使 用 此 控件 。 
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声明 示例 : 


<asp:Label Id="Labell" Text=" 显 示 文 本 " Runat="Server" ></asp:Label> 


2) ”Literal 控件 

Literal 控件 与 Label 控件 类 似 ， 也 用 于 在 页 面 上 显示 静态 的 文本 。 但 与 Label 控件 不 同 
的 是 ，Literal 控件 不 允许 对 所 显示 的 文本 应 用 样式 。 

声明 示例 : 

<asp:Literal id="Literall" Text=" 显 示 文 本 " Runat="Server" /> 


2. 输入 控件 


输入 控件 是 指 允 许 用 户 输入 文本 信息 的 控件 ， 这 里 主要 指 TextBox 控件 。 

TextBox 控件 可 以 创建 三 种 形式 的 文本 框 : 单行 文本 框 、 多 行文 本 框 和 密码 文本 框 ， 
其 属性 TextMode 决定 了 当前 所 显示 的 文本 框 的 形式 。 当 属性 TextMode 的 值 为 Single 时 ， 
显示 为 单行 文本 框 ; 当 其 值 为 Multiline 时 ， 显 示 为 多 行文 本 框 ; 当 其 值 为 password 时 ， 显 
示 为 密码 文本 框 。 

声明 示例 : 

<asp:TextBox ID="TextBoxl" runat="server" Text=" 单 行文 本 " TextMode=" 

SingleLine" /> 

显示 效果 : 

友和 六 丰 

声明 示例 : 


<asp:TextBox ID="TextBoxl" Rows="5" runat="server" Text=" 多 行文 本 " 
TextMode="MultiLine" /> 


显示 效果 : 


声明 示例 : 
<asp:TextBox ID="TextBoxl" runat="server" TextMode="Password" /> 
显示 效果 : 


[rr 


3. 选择 控件 


选择 控件 是 指 在 页 面 中 提供 相关 选项 ， 人 允许 用 户 进行 选择 操作 的 控件 。 
1) CheckBox 控件 
CheckBox 控件 主要 用 于 创建 能 够 在 选中 和 清除 两 种 状态 间 进 行 切换 的 复 选 框 。 通过 其 
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Checked 属性 ， 可 以 获取 或 设置 当前 复 选 框 的 状态 。 
声明 示例 : 
<asp:CheckBox ID="Checkl" runat="server" Checked="true" Text="CheckBox" /> 
显示 效果 : 
lV CheckBox 


2) ”CheckBoxList 控件 
CheckBoxList 控件 主要 用 于 创建 一 组 复 选 框 控件 ， 它 使 得 创建 含有 多 个 CheckBox 控 
件 的 页 面 更 为 简单 。 由 于 CheckBoxList 控件 是 允许 多 项 选择 的 ， 因 此 在 判断 用 户 所 选择 的 
项 时 必须 通过 一 个 循环 来 遍历 所 有 条 目 ， 并 判断 该 条 目 是 否 选择 。 
声明 示例 : 
<asp:CheckBoxList id="Checkl" RepeatDirection="Horizontal" 
RepeatColumns=4 RepeatLayout="table" CellPadding="3" Runat="Server"> 
<asp:ListIitem>Checkl</asp:ListItem> 
<asp:ListItem>Check2</asp:ListItem> 
<asp:ListItem>Check3</asp:ListItem> 


<asp:ListItem>Check4</asp:ListItem> 
</asp:CheckBoxList> 


显示 效果 : 
TCheckl MCheck2 厂 Check3 厂 Check4 


3) “DropDownList 控件 
DropDownList 控件 主要 用 于 创建 单一 的 下 拉 列 表 框 , 在 其 下 拉 列 表 框 中 可 以 包含 任意 
数目 的 项 。 通 过 SelectedIndex 属性 ， 可 以 获取 用 户 在 下 拉 列 表 框 中 所 选择 的 项 的 索引 。 
声明 示例 : 
<asp:DropDownList ID="DropDownListl" runat="server"> 
<asp:ListItem Value="Red" Selected="true"> 红 色 </asp:ListItem> 
<asp:ListItem Value="Green"> 绿 色 </asp:ListItem> 


<asp:ListItem Value="Black"> 黑 色 </asp:ListItem> 
</asp:DropDownList> 


显示 效果 : 
Ea| 


4) ListBox 控件 

ListBox 控件 主要 用 于 创建 可 滚动 的 列表 框 控件 ， 并 人 允许 选择 其 中 的 一 项 或 多 个 选项 。 
通过 Rows 属性 ， 可 以 设置 ListBox 控件 所 显示 的 行 数 ， 通 过 SelectionMode 属性 ， 可 以 设 
置 ListBox 控件 的 选择 模式 是 单 选 (Single) 还 是 多 选 (Multiple); 通过 SelectedItem 属性 ， 可 
以 获取 当前 所 选择 的 项 。 

声明 示例 : 

<asp:ListBox ID="ListBoxl" Rows="5" runat="server" SelectionMode=" 

Multiple"> 
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<asp:ListItem Value="Red" Selected="true"> 红 色 </asp:ListItem> 

<asp:ListItem Value="Green"> 绿 色 </asp:ListItem> 

<asp:ListItem Value="Black"> 黑 色 </asp:ListItem> 
</asp:ListBox> 


显示 效果 : 


5) ”RadioButton 控件 

RadioButton 控件 主要 用 于 创建 单个 单 选 按钮 。 通过 Checked 属性 ， 可 以 设置 或 获取 单 
选 按 钮 是 否 被 选中 。 通 过 设置 多 个 RadioButton 控件 的 GroupName 属性 为 同一 个 值 ， 可 创 
建 一 组 互相 排斥 的 选项 ， 即 一 次 只 能 选中 组 内 的 一 个 选项 ， 而 不 能 多 选 。 

声明 示例 : 

<asp:RadioButton ID="RadioButtonl" runat="server" Checked="true" Text=" 单 

选 按钮 " /> 

显示 效果 : 

5 单 选 按钮 

6) ”RadioButtonList 控件 

RadioButtonList 控件 用 于 创建 一 组 互 斥 的 单 选 按钮 。 相 对 于 RadioButton 控件 来 说 ， 如 
果 需 要 使 用 数据 绑 定 来 创建 一 组 单 选 按钮 ， 则 RadioButtonList 控件 更 易于 使 用 ， 但 单个 
RadioButton 控件 则 更 易于 布局 。 

声明 示例 : 


<asp:RadioButtonList ID="RadioButtonListl" CellPadding="3" 
runat="server"> 

<asp:ListItem Value="Radiol" Selected="true"> 单 选 按 钮 1</asp:ListItem> 

<asp:ListItem Value="Radio2"> 单 选 按钮 2</asp:ListItem> 

<asp:ListItem Value="Radio3"> 单 选 按钮 3</asp:ListItem> 
</asp:RadioButtonList> 


显示 效果 : 
单 选 按钮 1 


个 单 选 按钮 2 
个 单 选 按钮 3 


4. 图 像 控 件 
图 像 控件 主要 用 于 在 页 面 中 显示 图 像 。 在 ASPNET 中 提供 了 两 种 图 像 控件 : Imasge 控 
件 和 ImageMap 控件 。 

1) ”Image 控件 

Image 控件 是 个 单纯 的 图 像 控 件 ， 其 主要 作用 便 是 在 页 面 上 显示 指定 的 图 像 。 
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声明 示例 : 


<asp:Image id="Imagel" ImageUrl="Image/Net .Gif" AlternateText=" 图 像 提示 文本 " 
Runat="Server" /> 


显示 效果 : 
Microsoft 


.Net 


2) ”ImageMap 控件 
ImageMap 控件 是 ASP.NET 2.0 中 新 增 的 控件 ， 又 叫 图 片 地 图 控件 。ImageMap 控件 可 
创建 包含 定义 的 作用 点 区 域 的 图 像 ， 也 就 是 说 ， 可 以 在 一 副 图 片 中 设置 很 多 的 热 区 ， 当 用 
户 单 击 不 同 热 区 的 时 候 可 实现 不 同 的 响应 , 既 可 以 让 用 户 通过 单 击 热 区 跳 转 到 不 同 的 URL， 
又 可 以 让 用 户 通过 单 击 热 区 运行 不 同 的 服务 器 代码 。 
声明 示例 : 
<asp:ImageMap ID="ImageMapl" runat="server" Height="42px" ImageUrl=" 
Image/map.jpg" Width="312px"> 
<asp:RectangleHotSpot AlternateText=" 网 易 " Bottom="42" HotSpotMode=" 
PostBack" PostBackValue="163" Right="111" /> 
<asp:RectangleHotSpot AlternateText=" 新 浪 " Bottom="42" HotSpotMode=" 
PostBack" Left="11ll" PostBackValue="sina" Right="229" /> 
<asp:RectangleHotSpot AlternateText="GOOGLE 搜索 " Bottom="42" HotSpotMode 
="PostBack" Left="229" PostBackValue="google" Right="312" /> 
</asp:ImageMap> 


显示 效果 : 


eda saa Coo8t 


5. 表单 提交 控件 

表单 提交 控件 是 指 用 于 提交 页 面 数据 至 服务 器 的 相关 控件 ， 包 括 Button 控件 、 
ImageButton 控件 和 LinkButton 控件 。 

1) Button 控件 

Button 控件 主要 用 于 创建 普通 按钮 。 

声明 示例 : 


<asp:Button ID="Buttonl" runat="server" Text=" 提 交 " onClick="Btn Click" /> 


2) ”ImageButton 控件 
ImageButton 控件 主要 用 于 创建 图 形 按钮 , 它 结合 了 Image 控件 和 Button 控件 , 以 Image 
控件 的 形式 显示 ， 而 执行 的 是 Button 控件 的 操作 。 
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声明 示例 : 


<asp:ImageButton id="ImageButtonl" RAlternateText=" 图 像 按钮 " 
ImageAlign="Middle" ImageUrl=" Image/Net.Gif " 
OnClick="ImageButton Click" Runat="Server"/> 


显示 效果 : 
Microsoft 


Net 


3) ”LinkButton 控件 

LinkButton 控件 主要 用 于 创建 超级 链接 样式 的 按钮 , 它 结 合 了 HyperLink 控件 和 Button 
控件 ， 具 有 与 HyperLink 控件 完全 相同 的 外 观 ， 而 执行 的 操作 与 Button 控件 完全 相同 。 

声明 示例 : 

<asp:LinkButton id="LinkButtonl" Text=" 提 交 " 

Onclick="LinkButton Click"Runat="Server" /> 


显示 效果 : 
捍 记 

6. 布局 控件 

布局 控件 主要 用 于 控制 页 面 的 版 面 布局 ， 其 控件 本 身 并 不 包含 特定 的 功能 。 在 
ASPNET 中 ， 布 局 控件 包括 BulletedList 控件 、MultiView 控件 、Panel 控件 、PlaceHolder 
控件 以 及 Table 控件 等 。 

1) BulletedList 控件 

BulletedList 控件 是 ASP.NET 2.0 中 新 增 的 一 个 控件 ， 它 可 以 在 页 面 上 轻松 地 创建 项 目 
符号 和 编号 格式 。 过 去 ， 如 果 需 要 动态 地 显示 项 目 符号 和 编号 格式 ， 要 么 使 用 HTML 中 的 
<ol> 或 <ul> 元 素 ， 要 么 使 用 Repeater 控件 。 但 前 者 过 于 死板 ， 而 后 者 则 可 谓 是 “ 杀 鸡 用 
千 为 ”。 

在 BulletedList 控件 中 ，BulletStyle 属性 和 DisplayMode 属性 是 最 为 重要 的 两 个 属性 。 
其 中 ，BulletStyle 属性 表示 项 目 符号 的 编号 样式 ， 如 Numbered( 数 字 格 式 )、LowerAlpha( 小 
写字 母 格 式 )、UpperAlpha( 大 写字 母 格 式 )、LowerRoman( 小 写 阿 拉 伯 数字 )、UpperRoman( 大 
写 阿拉 伯 数 字 )、Disc( 实 心 圆圈 )、Circle( 空 心 圆圈 ) 以 及 Square( 实 体 黑 方块 ) 等 。 DisplayMode 
属性 则 表示 选项 的 显示 模式 ， 包 括 Text( 纯 文本 )、HyperLink( 超 链接 ) 和 LinkButton( 链 接 按 
钮 ) 等 。 

声明 示例 : 

<asp:BulletedList ID="BulletedListl" Font-Size="13px" runat="server" 

Bulletstyle="Square"> 

<asp:ListItem Value="Iteml"> 列 表 项 目 1</asp:ListItem> 
<asp:ListItem Value="Item2"> 列 表 项 目 2</asp:ListItem> 
<asp:ListItem Selected="True" Value="Item3"> 列 表 项 目 3</asp:ListItem> 


<asp:ListItem Value="Item4"> 列 表 项 目 4</asp:ListItem> 
</asp:BulletedList> 
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显示 效果 : 


= 列表 项 目 1 
a 列表 项 目 2 
列表 项 目 3 
a 列表 项 目 4 


2) MultiView 控件 

MultiView 控件 也 是 ASPNET 2.0 中 新 增 的 控件 ， 又 称 为 多 页 面 控 件 。MultiView 控件 
主要 用 来 创建 包含 多 个 逻辑 视图 的 页 面 ， 其 中 每 个 视图 页 面 均 对 应 一 个 View 控件 。View 
控件 是 一 个 Web 控件 的 容器 ， 在 其 中 可 以 添加 其 他 的 文本 或 控件 ， 而 MultiView 控件 则 是 
为 了 显示 View 控件 而 定制 的 工具 。 从 某 种 程度 上 来 说 ，MultiView 控件 有 点 类 似 于 C/S 开 
发 中 常见 的 TabControl 控件 , 可 以 在 一 个 页 面 上 通过 切换 不 同 的 选项 卡 来 显示 不 同 的 内 容 。 

通过 设置 MultiView 控件 的 ActiveViewIndex 属性 ， 可 以 控制 当前 所 显示 的 视图 页 面 。 

声明 示例 : 


<asp:RadioButtonList ID="RadioButtonListl" CellPadding="3" 
RepeatLayout="Table" runat="server" RepeatDirection="Horizontal"> 
<asp:ListItem Value="Iteml" Selected="true"> 视 图 页 面 </asp:ListItem> 
<asp:ListItem Value="Item2"> 视 图 页 面 </asp:ListItem> 
</asp:RadioButtonList> 
<asp:MultiView ID="MultiViewl" ActiveViewIndex="0" runat="server"> 
<asp:View ID="Viewl" runat="server"> 
<p align=center> 
<asp:Image ID="Imagel" ImageUrl="image/1.jpg" runat="server" /> 
<br /><font color="red"> 这 是 第 一 个 视图 页 面 </font> 
</p> 
</asp:View> 
<asp:View ID="View2" runat="server"> 
<p align=center> 
<asp:Image ID="Image2" ImageUrl="image/2.jpg" runat="server" /> 
<br /><font color="red"> 这 是 第 二 个 视图 页 面 </font> 
</p> 
</asp:View> 
</asp:MultiView> 


显示 效果 : 
视图 页 面 1 视图 页 面 2 个 视图 页 面 1 6 视图 页 面 2 


3) ”Panel 控件 
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Panel 控件 是 一 种 容器 控件 , 它 主要 用 于 以 编程 的 方式 来 生成 多 个 控件 , 动态 隐藏 或 显 
示 一 组 控件 。 
声明 示例 : 


<asp:Panel id="Panell" runat="server" BackColor="gainsboro" Height="150px" 
Width="200px" > 

<p align="center"><br /> 

<asp:Label ID="Labell" runat="server" ForeColor="red" Font-Size="14px" 
Text=" 这 是 在 Panel 控件 里 "></asp:Label><br /><br /> 

<asp:Button ID="Buttonl" runat="server" Text=" 确 定 " /></p> 
</asp:Panel> 


显示 效果 : 
这 是 在 pane1 控 件 里 


两 宇 | 


4) ”PlaceHolder 控件 

PlaceHolder 控件 也 是 一 个 容器 控件 ， 可 以 动态 地 添加 各 种 Web 控件 。 但 是 ， 与 Panel 
控件 相 比 ， 它 并 不 产生 任何 可 见 的 输出 ， 而 仅仅 是 作为 一 种 容器 存在 。 

声明 示例 : 


<asp:PlaceHolder id="PlaceHolderl" runat="server"> 

<p align="center"><br /> 

<asp:Label ID="Labell" runat="server" ForeColor="red" Font-Size="14px" 
Text=" 这 是 在 PlaceHolder 控件 里 "></asp:Label><br /><br /> 

<asp:Button ID="Buttonl" runat="server" Text=" 确 定 " /></p> 
</asp:PlaceHolder> 


5) ”Table 控件 

Table 控件 主要 用 于 在 页 面 上 创建 表格 。 与 HTMLTable 不 同 的 是 ，Table 控件 与 相关 
的 TableRow 控件 和 TableCell 控件 相 结 合 ， 可 以 通过 编程 的 方式 来 动态 地 创建 表格 或 控制 
版 面 布局 。 

声明 示例 : 


<asp:Table ID="Tablel" runat="server" GridLines="Both" Font-Size="]3px"> 

<asp:TableHeaderRow> 
<asp:TableHeaderCel1> 标 题 一 </asp:TableHeaderCcell> 
<asp:TableHeaderCel11> 标 题 二 </asp:TableHeaderCell> 
<asp:TableHeaderCel11> 标 题 三 </asp:TableHeaderCell> 

</asp:TableHeaderRow> 

<asp:TableRow> 
<asp:TableCell>[0,0]</asp:TableCell> 
<asp:TableCell>[0,1]</asp:TableCell> 
<asp:TableCell>[0,2]</asp:TableCell> 

</asp:TableRow> 
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<asp:TableRow> 
<asp:TableCell>[1,0]</asp:TableCell> 
<asp:TableCell>[1,1]</asp:TableCell> 
<asp:TableCell>[1,2]</asp:TableCell> 

</asp:TableRow> 

<asp:TableRow> 
<asp:TableCell>[2,0]</asp:TableCell> 
<asp:TableCell>[2,1]</asp:TableCell> 
<asp:TableCell>[2,2]</asp:TableCell> 

</asp:TableRow> 

</asp:Table> 


显示 效果 : 

奈 题 一 昧 题 二 | 标题 三 
[0,0] [C0, 1] [0, 2] 
[1,0] [U1,1] [U1,2] 


[2,0] |[2,1] |[2, 2] 


7. 导航 控件 


导航 控件 主要 用 于 实现 页 面 或 站 点 的 导航 功能 ， 该 类 控件 包括 HyperLink 控件 和 
TreeView 控件 。 

1) ”HyperLink 控件 

HyperLink 控件 主要 用 于 创建 文本 或 图 像 的 超级 链接 。 通 过 属性 NavigateUrl， 可 以 设 
置 或 获取 链接 的 URL 地 址 。 同 时 ，HyperLink 控件 还 提供 了 Text 属性 和 ImageUzrl 属性 ， 
前 者 表示 创建 文本 链接 ， 后 者 表示 创建 图 像 链 接 。 

声明 示例 : 

文本 链接 ， 


<asp:HyperLink ID="HyperLinkl" Text=" 链 接 文本 "NavigateUrl="test1.aspxn" 
runat="server"></asp:HyperLink> 


<p> 图 像 链接 : <br /> 

<asp:HyperLink ID="HyperLink2" ImageUrl="image/2.jpg" NavigateUr1="testl. 
aspx" runat="server"> 图 像 链 接 </asp:HyperLink></p> 

显示 效果 : 

文本 链接 ， 链 按 廊 本 


2) TreeView 控件 
TreeView 控件 是 ASP.NET 2.0 中 新 增 的 服务 器 控件 ， 它 主要 用 于 创建 树 形 视 图 ， 通 常 
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可 用 来 实现 应 用 程序 的 功能 菜单 。 在 ASPNET 1.0 中 ， 微 软 并 未 将 TreeView 控件 作为 
ASPNET 的 一 个 内 置 服务 器 控件 , 而 是 将 其 作为 一 个 附加 的 Web 控件 集 ( 即 ntermet Explorer 
Web) 中 的 一 部 分 。 

声明 示例 : 


<asp:TreeView ID="TreeViewl" runat="server" ExpandDepth="1" 
ShowLines="True" ForeColor="Blue"> 
<Nodes> 
<asp:TreeNode SelectAction="Expand" Text=" 节 点 一 "> 
<asp:TreeNode NavigateUrl="Pagel.aspx" Target="main" Text=" 子 节点 1"> 
</asp:TreeNode> 
<asp:TreeNode NavigateUrl="Page2.aspx" Target="main" Text=" 子 节点 2"> 
</asp:TreeNode> 
<asp:TreeNode NavigateUrl="Page3.aspx" Target="main" Text=" 子 节点 3"> 
</asp:TreeNode> 
</asp:TreeNode> 
<asp:TreeNode SelectAction="Expand" Target="main" Text=" 节 点 二 
<asp:TreeNode NavigateUrl="Page4.aspx" Target="main" Text=" 子 节点 1"> 
</asp:TreeNode> 
<asp:TreeNode NavigateUrl="Page5.aspx" Target="main" Text=" 子 节点 2"> 


</asp:TreeNode> 
</asp:TreeNode> 
<asp:TreeNode NavigateUrl="Page6.aspx" Target="main" Text=" 节 点 三 "> 
</asp:TreeNode> 
</Nodes> 
</asp:TreeView> 


显示 效果 : 


8. 广告 控件 

广告 控件 主要 用 于 实现 广告 图 片 的 随机 显示 ， 这 里 主要 是 指 AdRotator 服务 器 控件 。 

AdRotator 控件 ， 又 叫 广告 控制 元 件 ， 其 作用 是 在 每 次 浏览 包含 该 控制 元 件 的 网 页 时 ， 
随机 显示 不 同 的 广告 图 片 ， 同 时 还 可 为 所 显示 的 广告 图 片 创建 相应 的 链接 。 在 AdRotator 
控件 中 ， 属 性 AdvertisementFile 指定 了 包含 要 发 布 的 广告 图 片 信息 的 XML 文件 。 

声明 示例 : 


<Asp:Adrotator id="adrotatorl" AdvertisementFile="adrotator.xml" 


runat="server" /> 
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9. 日 期 控件 


日 期 控件 主要 用 于 提供 对 日 历 的 查看 及 对 日 期 的 选择 。 

Calendar 控件 是 一 个 日 历 控制 控件 ， 可 以 用 来 显示 日 历 、 浏 览 日 期 并 进行 日 期 选择 。 
Calendar 控件 不 支持 绑 定 到 数据 源 ， 但 可 修改 各 个 日 期 单元 格 的 内 容 和 格式 设置 。 

声明 示例 : 


<asp:Calendar id="Calendarl" 
SelectionMode="DayWeekMonth" 
Font-Size="13px" 
PrevMonthText=" 上 一 月 " 
NextMonthText=" 下 一 月 " 
SelectWeekText=" 选 择 星期 " 
SelectMonthText=" 选 择 整 月 " 
runat="server"> 
<todaydaystyle font-bold="true" /> 
<dayheaderstyle font-bold="true" /> 
<othermonthdaystyle forecolor="gray" /> 
<titlestyle backcolor="#3366ff" forecolor="white" font-bold="true" /> 
<selecteddaystyle backcolor="#ffcc66" font-bold="true" /> 
<nextprevstyle forecolor="white" font-size="1l3px" /> 
<selectorstyle backcolor="#99ccff" forecolor="navy" font-size="1l2px" /> 
</asp:calendar> 


显示 效果 : 
日 = ES 到 四 五 六 
2 0 31 1 2 3 4 
5 6 1 8 9 1 U1 
2 B33 ME HU 1 18 
FT 
26 2 28 29 30 上 2 
3 4 5 5 ks 8 8 

10. 数据 控件 


数据 控件 主要 用 于 通过 数据 绑 定 以 列表 或 其 他 的 布局 方式 在 页 面 上 显示 其 中 的 数据 。 
在 ASPNET 中 , 数据 控件 主要 包括 DataGrid 控 件 .DataList 控 件 .Repeater 控 件 以 及 GridView 
控件 和 DetailsView 控件 。 其 中 ，GridView 控件 和 DetailsView 控件 均 是 ASPNET 2.0 中 新 
增 的 数据 控件 。 

第 6 章 将 详细 介绍 各 种 常用 数据 控件 的 使 用 ， 这 里 不 再 缆 述 。 

11. 验证 控件 

验证 控件 主要 用 于 对 用 户 在 输入 表单 中 的 各 输入 控件 中 所 输入 的 值 进行 验证 ， 以 判断 
其 输入 是 否 正 确 、 合 法 。 当 验证 失败 时 ， 将 会 自动 显示 验证 控件 中 所 设置 的 错误 信息 ， 同 
寺 阻 止 数 据 的 提交 。 

1) “CompareValidator 控件 

CompareValidator 控件 ， 又 叫 比较 验证 控件 ， 主 要 用 于 将 输入 控件 的 值 与 指定 的 常数 
值 或 其 他 输入 控件 的 值 按照 指定 的 比较 运算 符 C、<、=、 僵 、> 半 、< 一 等 ) 进 行 比较 ， 以 判 
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断 两 个 值 是 否 匹 配 。 此 外 ，CompareValidator 控件 还 可 用 来 判断 用 户 所 输入 的 值 是 否 可 以 
转换 为 其 Type 属性 所 指定 的 数据 类 型 。 
声明 示例 : 


<asp:CompareValidator id="CompareValidator1l" 
Runat="server" 
ErrorMessage=" 验 证 失败 " 
ControlToCompare="TextBox2" 
ControlToValidate="TextBoxl"></asp:CompareValidator> 


2) ”RangeValidator 控件 

RangeValidator 控件 ,又 叫 范围 比较 验证 控件 , 主要 用 于 验证 用 户 的 输入 是 否 在 指定 的 
范围 内 。 

声明 示例 : 


<asp:RangeValidator id="RangeValidatorl" 
Runat=" SerVer" 
ErrorMessage=" 输 入 数值 应 在 1 和 31 之 间 " 
ControlToValidate="TextBox1" 
MinimumValue="1" 
MaximumValue="31" 
Type="Integer"></asp:RangeValidator> 


3) ”RequiredFieldValidator 控件 
RequiredValidator 控件 ， 又 叫 必须 字段 验证 控件 ， 主 要 用 于 对 用 户 是 否 输入 了 数据 进 
行 验证 ， 以 保证 强制 性 输入 。 
声明 示例 : 
<asp:RequiredFieldValidator id="RequiredFieldValidator2" 
Runat="server" 


ErrorMessage=" 输 入 不 能 为 空 ! " 
ControlToValidate="TextBoxl" ></asp:RequiredFieldValidator> 


4) ， RegularExpressionValidator 控件 
RegularExpressionValidator 控件 ， 又 叫 模式 匹配 控件 , 主要 用 于 检查 用 户 所 输入 的 数据 
是 否 与 用 户 所 设置 的 正则 表达 式 定义 的 模式 相 匹配 。 该 控件 可 以 说 是 所 有 验证 控件 中 最 灵 
活 、 功 能 最 强大 的 验证 控件 。 
声明 示例 : 
<asp:RegularExpressionValidator Runat="Server" 
Id="RegularExpressionValidator2" 
ErrorMessage=" 邮 箱 地 址 输入 错误 ! " 
ControlToValidate="TextBoxl" 
ValidationExpression="[\w-]+@[\w-]+\. (com|lnet|orgledulmil)$"> 
</asp:RegularExpressionValidator> 


5) ”CustomValidator 控件 
CustomValidator 控件 ， 又 叫 自 定义 验证 控件 ， 它 允许 用 户 编写 自己 的 验证 逻辑 (通常 为 
一 个 自 定义 的 客户 端 或 服务 器 端的 函数 ) 来 对 用 户 所 输入 的 数据 进行 验证 。 
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<asp:CustomValidator Runat="SerVer" 
Id="CustomValidator1l" 
ControlToValidate="TextBoxl" 
ErrorMessage=" 请 输入 正确 的 内 容 ! " 
OnServerValidate="ValidateData"></asp:CustomValidator> 
6) ValidationSummary 控件 
ValidationSummary 控件 ， 又 叫 验证 摘要 控件 ， 主 要 用 于 在 页 面 的 某 个 位 置 显示 当前 页 
上 所 有 验证 控件 的 错误 摘要 信息 。 
<asp:ValidationSummary Runat=”Server” 


Id="ValidationSummaryl" 
HeaderText=" 错 误 信息 : "></asp:ValidationSummary> 


5.3 ”典型 实例 : 创建 个 人 求职 表单 


本 实例 ， 将 介绍 如 何 创 建 一 个 用 于 个 人 求职 的 输入 表单 。 在 表单 中 将 充分 应 用 
ASPNET 中 的 各 种 常用 的 Web 服务 器 控件 ， 以 帮助 大 家 加 深 理解 。 
表单 及 控件 的 布局 如 图 5.2 所 示 。 


强 个 人 痊 历 - Microsoft Ints 


放出， 六 生 个 女 二 妈妈 人 吕 | GG 未婚 已 
CTT | deW 

民 ，[X 了 | 国有 可 | ER 

[全 3 | 
联 和 ttt [ wm 
国定 电话 ET 


来 取 类 汇 ， 人 全 职 “C 羔 职 C 两 者 六 可 科 隘 内 位 : 
用 [ 面 司 到 要 日 期 | [本 时。 可 | 
本 交 | = 
En [me 
图 5.2 输入 表单 


对 于 输入 表单 的 版 面 布局 控制 ， 最 常见 的 是 通过 表格 来 实现 ， 本 例 也 不 例外 。 在 这 里 ， 
将 个 人 简历 信息 分 为 基本 资料 、 联 系 方式 、 个 人 爱好 、 教 育 情况 、 工 作 经 历 以 及 求职 意向 
等 几 大 块 。 在 每 一 块 中 ， 又 包括 相关 的 多 项 信息 。 对 每 项 信息 的 输入 或 选择 ， 均 通过 
ASPNET 中 的 Web 服务 器 控件 来 实现 。 
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在 个 人 简历 中 ， 性 别 、 婚 姻 状 况 以 及 求职 类 型 3 项 都 是 需要 在 多 个 选项 中 选择 且 仅 能 
选择 一 项 ， 为 此 采用 了 RadioButtonList 控件 来 实现 ， 而 没有 采用 单个 的 RadioButton 控件 。 
相对 而 言 , 在 需要 提供 一 组 互 斥 的 选项 时 ,RadioButtonList 控件 将 比 RadioButton 控件 更 为 
快捷 和 方便 。 

对 于 个 人 爱好 来 说 ， 需 要 提供 多 个 选项 且 能 进行 多 选 ， 因 此 这 里 采用 了 CheckBoxList 
控件 来 实现 。 

下 面 ， 来 看 页 面 的 代码 实现 。 

[5-1.aspx) 


<%@ Page Language="VB" ContentType="text/html" $%> 
<html xmlns="http://www.w3.0org/1999/xhtml"> 


<head> 

<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title> 个 人 简历 </title> 

</head> 

<body> 


<form runat="server"> 
<p align="center"><b> 个 人 简历 </b></p> 
<table align=center style="font-size:13px;" cellPadding=0 bgcolor="gray" 
cellspacing=1 width=700 border=0> 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 基 本 资料 
</b></td> 
/Er 
<tr height=25 bgcolor="white"> 
<td align="right"> 真 实 姓 名 : </td> 
<td colspan=3 style="padding-left:5px;"><asp:TextBox ID="Name" 
runat="server"></asp:TextBox></td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td width="14%" align="right"> 性 别 : </td> 
<td width="36%" style="padding-left:5px;"> 
<asp:RadioButtonList ID="RadioButtonListl" runat="server" 
CellPadding="2" CellSpacing="2" RepeatDirection="Horizontal"> 
<asp:ListItem Text=" 先 生 " Value=" 男 ” Selected=true></asp:ListItem> 
<asp:ListItem Text=" 女 士 " Value=" 女 "></asp:ListItem> 
</asp:RadioButtonList> 
</td> 
<td width="12%" align="right"> 婚 姻 状况 : </td> 
<td width="38%" style="padding-left:5px;"> 
<asp:RadioButtonList ID="RadioButtonList2" runat="server" 
CellPadding="2" CellSpacing="2" RepeatDirection="Horizontal"> 
<asp:ListItem Text=" 未 婚 " Value=" 未 " Selected=true></asp:ListItem> 
<asp:ListItem Text=" 已 婚 " Value=" 已 "></asp:ListItem> 
</asp:RadioButtonList> 
</td> 
<AEE> 
<tr height=25 bgcolor="white"> 
<td align="right"> 身 份 证 号 : </td> 
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<td style="padding-left:5px;"> 
<asp:TextBox ID="sfz" runat="server"></asp:TextBox></td> 
<td align="right"> 出 生日 期 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="Birth" runat="server"></asp:TextBox></td> 
ltr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 民 族 : </td> 
<td style="padding-left:5px;"> 
<asp:DropDownList ID="mz" runat="server"> 
<asp:ListItem Text=" 汉 族 " Value=" 汉 族 " Selected="true"> 
</asp:ListItem> 
<asp:ListItem Text=" 会 族 " Value=" 合 族 "></asp:ListItem> 
<asp:ListItem Text=" 曾 族 " Value=" 苗 族 "></asp:ListItem> 
<asp:ListItem Text=" 回 族 "” Value=" 回 族 "></asp:ListItem> 
<asp:ListItem Text=" 维 吾 尔 族 "” Value=" 维 寿 尔 族 "></asp:ListItem> 
<asp:ListItem Text=" 其 他 少数 民族 " Value=" 其 他 少数 民族 "></asp:ListItem> 
</asp:DropDownList> 
</td> 
<td align="right"> 籍 贯 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="jg" runat="server"></asp:TextBox> 
</td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 身 高 : </td> 
<td style="padding-left:5px7"> 
<asp:TextBox ID="sg" runat="server"></asp:TextBox>&nbsp; (厘米 ) 
</td> 
<td align="right"> 体 重 : </td> 
<td style="padding-left:5px;" 
<asp:TextBox ID="tz" runat="server"></asp:TextBox>&nbsp; (公斤 ) 
</td> 
</tr> 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 联 系 方式 
</b></td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 联 系 地 址 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="Addr" runat="server"></asp:TextBox> 
</td> 
<td align="right"> 邮 政 编码 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="Zip" runat="server"></asp:TextBox> 
</td> 
xP 
<tr height=25 bgcolor="white"> 
<td align="right"> 固 定 电话 : </td> 
<td style="padding-left:5px;"> 
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<asp:TextBox ID="Tell" runat="server"></asp:TextBox> 
</td> 
<td align="right"> 移 动 电话 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="Tel2" runat="server"></asp:TextBox> 
</td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right">E-MAIL: </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="Email" runat="server"></asp:TextBox> 
</td> 


ight"> 个 人 主页 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="HomePage" runat="server"></asp:TextBox> 
</td> 
到 /化 工交 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 个 人 爱好 
</b></td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td colspan=4 style="padding-left:20px;"> 
<asp:CheckBoxList ID="xqah" CellPadding=5 runat="server" 
RepeatDirection="Horizontal"> 
<asp:ListItem> 电 脑 游 戏 </asp:ListItem> 
<asp:ListItem> 软 件 编程 </asp:ListItem> 
<asp:ListItem> 体 育 运动 </asp:ListItem> 
<asp:ListItem> 棋 牌 娱乐 </asp:ListItem> 
<asp:ListItem> 读 书 学 习 </asp:ListItem> 
<asp:ListItem> 其 他 </asp:ListItem> 
</asp:CheckBoxList> 
</td> 
</tr> 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 教 育 情况 
</b></td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 最 高 学 历 : </td> 
<td style="padding-left:5px;"> 
<asp:DropDownList ID="xl" runat="server"> 
<asp:ListItem Text=" 本 科 " Value=" 本 科 " 
Selected="true"></asp:ListItem> 
<asp:ListItem Text=" 大 专 " Value=" 大 专 "></asp:ListItem> 
<asp:ListItem Text=" 中 专 " Value=" 中 专 "></asp:ListItem> 
<asp:ListItem Text=" 其 他 " Value=" 其 他 "></asp:ListItem> 
</asp:DropDownList> 
</td> 
<td align="right"> 所 学 专业 : </td> 
<td style="padding-left:5px;"> 
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<asp:TextBox ID="zy" runat="server"></asp:TextBox> 
</ta> 
tr 
<tr height=25 bgcolor="white"> 
<td align="right"> 毕 业 院 校 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="byyx" runat="server"></asp:TextBox> 
</td> 
<td align="right"> 毕 业 时 间 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="bysj" runat="server"></asp:TextBox>&nbsp; (如 : .7) 
</td> 
区 全 823 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 工 作 经 历 
</b></td> 
/EE> 
<tr height=25 bgcolor="white"> 
<td colspan=4 style="padding-left:5px;padding-bottom:3px;padding-top: 
3px;"> 
<asp:TextBox ID="TextBoxl" runat="server" TextMode="MultiLine" 
Width="585px" Rows="5"></asp:TextBox> 
</td> 
</tr> 
<tr height=25 bgColor="#00cccc"> 
<td colspan=4 style="color:white;padding-left:5px;"><b> 求 职 意向 
</b></td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 求 职 类 型 : </td> 
<td style="padding-left:5px;"> 
<asp:RadioButtonList ID="qzlx" runat="server" CellPadding="2" 
Cellspacing="2" RepeatDirection="Horizontal"> 
<asp:ListItem Text=" 全 职 " Value=" 全 职 " Selected=true></asp:ListItem> 
<asp:ListItem Text=" 兼 职 " Value=" 兼 职 ">></asp:ListItem> 
<asp:ListItem Text=" 两 者 兼 可 " Value=" 两 者 兼 可 "></asp:ListItem> 
</asp:RadioButtonList> 
</td> 
<td align="right"> 求 职 岗位 : </td> 
<td style="padding-left:5px;"> 
<asp:TextBox ID="qzgw" runat="server"></asp:TextBox> 
</td> 
</tr> 
<tr height=25 bgcolor="white"> 
<td align="right"> 月 薪 要 求 : </td> 
<td style="padding-left:5px;"> 
<asp:DropDownList ID="yxyq" runat="server"> 
<asp:ListItem Text=" 面 议 ”" Value=" 面 议 " 
Selected="true"></asp:ListItem> 
<asp:ListItem Text="1000 以 下 " Value="1000 以 下 "></asp:ListItem> 
<asp:ListItem Text="1000--2000" Value="1000--2000"></asp:ListItem> 
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<asp:ListItem Text="2000--3000" Value="2000--3000"></asp:ListItem> 
<asp:ListItem Text="3000 以 上 "Value="3000 以 上 "></asp:ListItem> 
</asp:DropDownList> 

</td> 

<td align="right"> 到 职 日 期 : </td> 

<td style="padding-left:5px;"> 
<asp:DropDownList ID="dzrq" runat="server"> 
<asp:ListItem Text=" 随 时 " Value=" 随 时 " 

Selected="true"></asp:ListItem> 

<asp:ListItem Text=" 一 个 星期 " Value=" 一 个 星期 ">></asp:ListItem> 


<asp:ListItem Text=" 一 个 月 " Value=" 一 个 月 "></asp:ListItem> 
<asp:ListItem Text=" 三 个 月 " Value=" 三 个 月 "></asp:ListItem> 
<asp:ListItem Text=" 半 年 之 内 ”Value=" 半 年 之 内 "></asp:ListItem> 
</asp:DropDownList> 
</td> 
</tr> 


<tr height=30 bgcolor="white"> 
<td colspan=4 align="center"> 
<asp:Button ID="Buttonl" runat="server" Text=" 提 交 " /> 
</td> 
</tr> 
</table> 
</form> 
</body> 
</html> 


在 本 例 中 ， 没 有 对 数据 的 提交 事件 进行 处 理 。 一 般 来 说 ， 首 先 需要 创建 一 个 数据 库 ， 
然后 在 其 中 添加 一 个 包含 以 上 信息 字段 的 数据 表 ， 并 在 对 数据 的 提交 事件 上 将 用 户 所 输入 
的 数据 添加 至 数据 库 中 。 第 6 章 将 介绍 如 何在 ASP.NET 中 访问 和 操作 数据 库 ， 学 完 之 后 ， 
相信 读者 就 能 自行 添加 提交 按钮 的 事件 代码 了 。 


5.4 习 题 


(1) 了 解 和 掌握 ASP.NET 中 的 各 种 服务 器 控件 的 使 用 。 

(2) 了 解 ASPNET 中 的 验证 控件 的 使 用 , 并 在 个 人 简历 实例 中 添加 对 相关 输入 控件 的 
验证 。 

(3) 在 学 习 完 本 书 第 6 章 后 ， 完 善 个 人 简历 实例 ， 添 加 “提交 ”按钮 的 单 击 事件 。 
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第 6 章 ADO.NET 与 数据 库 的 访问 


在 第 5 章 中 ,对 ASPNET 页 面 的 基本 结构 及 VB.NET 脚本 语言 的 相关 语法 进行 了 详细 
的 叙述 。 本 章 ， 将 向 大 家 介绍 ASPNET 中 专门 用 来 处 理 数据 访问 的 组 件 一 一 ADO.NET。 


6.1 ADO.NET 简介 


ADO.NET 是 ADO(Microsoft ActiveX Data Objects) 的 一 个 后 继 版 本 ， 其 主要 目的 是 为 
了 在 .NET 框架 上 更 容易 地 创建 分 布 式 的 、 数 据 共享 的 应 用 程序 。 由 于 ADONET 提供 了 到 
所 有 OLE DB 数据 源 的 接口 ， 因 此 它 为 存 取 任何 类 型 的 数据 均 提 供 了 一 个 框架 。 通 过 
ADO.NET， 可 以 在 .NET 应 用 程序 中 连接 不 同类 型 的 数据 源 ， 并 对 数据 进行 检索 、 处 理 和 
更 新 等 操作 。 

ADO.NET 为 多 层 结构 的 分 布 式 应 用 程序 提供 了 一 种 断 开 式 的 数据 访问 ,所 谓 断 开 式 的 
数据 访问 ， 是 指 在 从 服务 器 获取 所 需 的 数据 后 ， 就 断 开 与 数据 源 的 连接 ， 而 在 本 机 的 缓存 
中 处 理 数据 。 这 种 方式 的 优势 在 于 ， 它 极 大 地 节省 了 数据 库 服 务 器 的 资源 占用 ， 从 而 为 建 
立 具 有 高 度 伸 缩 性 的 应 用 程序 提供 了 保障 。 


提示 : 这 里 所 指 的 伸缩 性 是 一 个 系统 性 能 的 指标 ， 用 于 衡量 应 用 程序 在 获取 更 多 资源 (内 存 、 
处 理 器 等 ) 时 的 执行 能 力 。 


在 ADONET 中 ，.NET 数据 提供 程序 和 DataSet 是 两 个 核心 的 组 成 部 分 。 

.NET 数据 提供 程序 提供 了 对 数据 库 的 连接 , 它 相当 于 DataSet 与 数据 源 之 间 的 通信 层 ， 
为 连接 、 存 取 、 检 索 数 据 源 中 的 信息 提供 了 所 有 的 机 制 。NET 数据 提供 程序 可 以 识别 并 处 
理 两 种 类 型 的 数据 源 : SQL Server 和 可 以 通过 OLE DB 进行 访问 的 任何 数据 源 。 前 者 仅 用 
于 与 SQL Server 进行 交互 ， 它 为 SQL Server 和 DataSet 之 间 的 通信 提供 了 所 有 的 方法 ， 后 
者 则 主要 用 于 协调 DataSet 和 OLE DB 数据 源 之 间 的 通信 。 在 .NET 数据 提供 程序 中 ， 提 供 
了 ADONET 中 的 4 个 核心 对 象 : Connection( 用 于 与 数据 库 建 立 连 接 )、Command( 用 于 执行 
具体 的 数据 库 操作 )、DataReader( 用 于 从 数据 源 中 获取 只 进 且 只 读 的 数据 流 ) 和 
DataAdapter( 用 于 填充 DataSet 对 象 )。 

DataSet 是 ADONET 的 断 开 式 结构 的 核心 组 件 ， 其 目的 是 实现 独立 于 任何 数据 源 的 数 
据 访 问 。DataSet 可 以 用 于 多 种 不 同 的 数据 源 ， 用 于 XML 数据 ， 或 用 于 管理 应 用 程序 本 地 
的 数据 。 可 以 将 它 看 成 是 数据 库 在 内 存 中 的 一 个 复制 。 正 是 由 于 DataSet 的 存在 ， 才 使 得 
程序 员 在 编写 .NET 应 用 程序 时 可 以 忽略 数据 库 之 间 的 差异 ， 从 而 获得 一 致 的 编程 模型 。 对 
于 DataSet， 还 将 在 6.2 节 中 进行 详细 的 叙述 。 
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6.2 ADO.NET 中 的 常用 对 象 


下 面 ， 介 绍 ADONET 中 的 几 个 常用 对 象 ， 包 括 Connection、Command、DataReader、 
DataSet、DataAdapter 和 DataView 等 。 它 们 是 ADONET 的 核心 组 件 。 


6.2.1 Connection 对 象 


Connection 对 象 用 于 获取 一 个 与 特定 数据 源 的 连接 ， 这 是 执行 所 有 数据 库 操 作 的 一 个 
必要 前 提 。 在 ADONET 中 ,提供 了 两 种 Connection 对 象 : SQLConnection 和 
OleDbConnection， 前 者 基于 SQL Server .NET 数据 提供 程序 ， 后 者 基于 OLE DB .NET 数据 
提供 程序 。 

下 面 介绍 Connection 对 象 的 常用 属性 和 方法 。 

1. 常用 属性 


@ ”ConnectionString: 用 于 获取 或 设置 数据 库 的 连接 字符 串 。 

e@ ConnectionTimeOut: 用 于 获取 或 设置 数据 库 连 接 的 超时 时 间 ， 其 单位 为 s， 默 认 
值 为 15s。 

@ DataBase: 用 于 获取 当前 连接 所 使 用 的 数据 库 名 称 。 

@ ”DataSource: 获取 当前 连接 的 数据 源 。 对 于 SQLConnection 对 象 ， 其 返回 的 值 是 
连接 的 SQL Server 实例 的 名 称 ， 而 对 于 OleDbConnection 对 象 ， 其 返回 的 值 是 数 
据 源 的 路 径 及 文件 名 。 

@ ”Provider: 返回 OLE DB Provider 的 名 字 , 该 属性 仅 适用 于 OleDbConnection 对 象 。 

@ ”ServerVersion: 返回 关于 所 连接 的 数据 库 的 版 本 信息 。 

. 

过 


State: 返回 当前 连接 的 状态 ， 其 值 为 一 个 ConnectionState 对 象 。 


@ Open: 用 于 打开 与 数据 库 的 连接 。 

@ ”ChangeDatabase: 用 于 改变 已 打开 的 数据 库 。 

@ CreateCommand: 用 于 创建 并 返回 一 个 与 该 连接 相关 联 的 Command 对 象 。 
@ 

@ 


Close: 用 于 关闭 与 数据 库 的 连接 。 
Dispose: 用 于 在 显 式 释 放 对 象 时 关闭 数据 库 连 接 。 


6.2.2 Command 对 象 


在 ADONET 中 ，Command 对 象 主要 用 于 执行 数据 库 的 相关 操作 ， 包 括 查询 、 删 除 、 
更 新 等 。Command 对 象 负责 生成 一 个 请 求 ， 并 将 其 传递 给 数据 源 。 如 果 有 返回 值 ， 则 
Command 对 象 将 以 DataReader、 标 量 值 或 参数 的 形式 返回 结果 。 Command 对 象 在 
ADO.NET 中 是 一 个 非常 重要 的 组 成 部 分 ， 后 面 将 要 叙述 的 DataReader 对 象 和 DataAdapter 
对 象 均 须 通过 Command 对 象 从 数据 库 中 获取 数据 ， 甚 至 DataReader 对 象 本 身 就 是 由 
Command 对 象 的 ExecuteReader() 方 法 来 创建 的 。 因 此 ， 掌 握 Command 对 象 的 使 用 方法 万 
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下 面 介 绍 Connection 对 象 的 常用 属性 和 方法 。 
1. 常用 属性 


CommandText: 设置 或 获取 Command 对 象 所 要 在 数据 源 上 执行 的 SQL 语句 或 存 
储 过 程 名 。 


@ CommandType: 表示 CommandText 值 的 类 型 , 其 可 能 的 取 值 为 StoredProcedure( 存 
储 过 程 名 )、TableDirect( 返 回 所 有 列 的 表 名 ) 和 Text(SQL 文本 命令 )， 其 中 
TableDirect 仅 适 用 于 OLE DB。 

@ CommandTimeout: 设置 或 获取 Command 命令 执行 并 产生 一 个 错误 前 等 待 的 时 间 ， 
类 型 为 int， 单 位 为 s， 默 认 值 为 30s; 如 将 其 值 设 置 为 0， 则 表示 没有 限制 超时 
时 间 。 

@ Connection: 设置 或 返回 与 该 命令 相关 联 的 Connection 对 象 。 

@ Parameters: 一 个 Parameter 对象 的 集合 。 可 以 通过 向 该 集合 中 添加 新 的 Parameter 
对 象 ， 在 执行 Command 命令 时 向 存储 过 程 传递 参数 。 

@ Transaction: 返回 该 命令 所 处 的 Transaction 对 象 。 对 于 SQLCommand， 返 回 的 是 
SQLTransaction 对 象 ， 对 于 OleDbCommand， 返 回 的 是 OleDbTransaction 对 象 ; 
默认 值 为 null。 

@ UpdateRowSource: 返回 命令 影响 的 记录 数 。 

2. 常用 方法 

@ ”Cancel: 用 于 试图 取消 所 执行 的 Command 命令 。 

@ CreateParameter: 用 于 创建 一 个 Parameter 对 象 的 实例 ， 该 对 象 表示 Command 对 
象 的 参数 。 

@ Dispose: 用 于 释放 命令 对 象 所 占用 的 资源 。 

@ ExecuteNonQuery: 用 于 执行 指定 的 SQL 语句 ， 并 返回 受 影响 的 记录 数 。 

@ ExecuteReader: 用 于 执行 指定 的 SQL 语句 ， 并 返回 一 个 DataReader 对 象 。 

@ ”ExecuteScalar: 用 于 执行 指定 的 SQL 语句 ， 并 获取 查询 所 返回 的 结果 集中 的 第 一 
行 的 第 一 列 的 值 ， 该 方法 将 忽略 额外 的 列 或 行 。 

@ ExecuteXmlReader: 如 果 Command 对 象 的 CommandType 属性 为 合法 的 包含 FOR 
XML 子 句 的 SQL 语句 时 ， 可 通过 此 方法 来 返回 一 个 XmlReader 对 象 ， 该 方法 仅 
支持 SQLCommand 对 象 。 

@ ”Prepare: 用 于 创建 Command 对 象 的 编译 版 本 。 

@ ResetCommandTimeOut: 用 于 将 Command 对 象 的 CommandTimeOut 属性 重 置 为 


默认 值 。 


6.2.3 DataReader 对 象 

DataReader 对 象 主要 用 于 获取 Command 对 象 执 行 的 结果 , 即 记录 集 , 该 记录 集 是 只 向 
前 、 只 读 的 数据 流 。 要 访问 DataReader 对 象 中 的 数据 ， 只 能 使 用 该 对 象 的 Read() 方 法 。 
DataReader 对 象 的 创建 只 能 通过 Command 对 象 的 ExecuteReader() 方 法 , 而 不 能 直接 使 用 构 


SS 


“126。 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


造 函数 。 当 创建 一 个 DataReader 对 象 时 ,其 指针 将 指向 首 记录 的 前 一 个 位 置 ,每 次 调用 Read() 
方法 后 其 指针 自动 后 移 一 个 ， 并 返回 一 个 布尔 值 表示 是 否 已 到 了 记录 的 末尾 。 
需要 特别 注意 的 是 ，DataReader 对 象 具有 独占 性 。 也 就 是 说 ， 当 使 用 DataReader 对 象 
时 ， 与 它 关 联 的 Connection 将 只 为 它 服务 ， 此 时 不 能 对 Connection 执行 任何 其 他 操作 ( 除 
Close0 方 法 之 外 )。 因 此 ， 在 使 用 完 DataReader 对 象 之 后 , 切记 要 将 其 关闭 之 后 再 执行 其 他 
操作 。 
下 面 介 绍 DataReader 对 象 的 常用 属性 和 方法 。 

. 常用 属性 

Depth: 用 于 返回 当前 行 的 嵌 套 深度 。 

FieldCount: 用 于 返回 当前 所 指 行 的 列 数 。 

IsClosed: 用 于 返回 当前 对 象 是 否 可 关闭 。 

RecordAffected: 用 于 返回 影响 的 记录 个 数 。 

Close: 用 于 关闭 当前 所 打开 的 DataReader 对 象 。 

GetBoolean: 用 于 获取 指定 列 的 Boolean 类 型 的 值 。 

GetByte: 用 于 获取 指定 列 的 Byte 类 型 的 值 。 

GetChar: 用 于 获取 指定 列 的 Char 类 型 的 值 。 

GetDataTypeName: 用 于 获取 指定 列 的 数据 类 型 。 

GetDateTime: 用 于 获取 指定 列 的 DateTime 对 象形 式 的 值 。 

GetDecimal: 用 于 获取 指定 列 的 Decimal 类 型 的 值 。 

GetDouble: 用 于 获取 指定 列 的 Double 类 型 的 值 。 

GetFieldType: 用 于 获取 指定 列 的 数据 类 型 的 Type 对 象 表示 。 

GetFloat: 用 于 获取 指定 列 的 Float 类 型 的 值 。 

GetInt16: 用 于 获取 指定 列 的 Short 类 型 的 值 。 

GetInt32: 用 于 获取 指定 列 的 Int 类 型 的 值 。 

GetInt64: 用 于 获取 指定 列 的 Long 类 型 的 值 。 

GetName: 用 于 获取 指定 列 的 列 名 。 

GetString: 用 于 获取 指定 列 的 String 类 型 的 值 。 

GetType: 用 于 获取 当前 对 象 (DataReader) 的 Type 对 象 表示 。 

GetValue: 用 于 获取 以 本 机 格式 表示 的 指定 列 的 值 。 

IsDbNull: 用 于 获取 一 个 值 ， 该 值 表示 列 中 是 否 包 含 不 存在 的 或 缺少 的 值 。 

NextResult: 用 于 在 读 取 批 处 理 SQL 语句 的 结果 时 ， 移 动 到 下 一 个 结果 。 

Read: 用 于 从 数据 源 中 读 取 一 个 或 多 个 记录 集 ， 并 返回 一 个 布尔 值 以 表示 记录 集 

是 否 已 到 最 后 一 条 记录 。 


6.2.4 DataAdapter 对 象 


DataAdapter 对 象 与 DataReader 对 象 一 样 ， 用 于 获取 Command 对 象 所 执行 的 结果 。 但 
是 ，DataAdapter 对 象 主要 作为 DataSet 和 数据 源 之 间 的 桥梁 ， 它 获取 Command 对 象 执行 


Es 


bt 
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的 结果 集合 ， 并 将 其 填充 DataSet。 
DataAdapter 对 象 除 了 用 来 向 DataSet 对 象 填充 数据 外 ， 还 可 将 对 DataSet 中 的 数据 所 
做 的 修改 更 新 至 实际 的 数据 库 中 。 


DataAdapter 对 象 的 常用 属性 和 方法 如 下 。 

1. 常用 属性 

@ ”SelectCommand: 用 于 获取 或 设置 用 来 从 数据 源 中 查询 记录 的 SQL 语句 或 存储 过 程 。 
@ ”InsertCommand: 用 于 获取 或 设置 用 来 向 数据 源 中 插入 记录 的 SQL 语句 或 存储 过 程 。 
@ DeleteCommand: 用 于 获取 或 设置 用 来 从 数据 源 中 删除 记录 的 SQL 语句 或 存储 过 程 。 
@ ”UpdateCommand: 用 于 获取 或 设置 用 来 更 新 数据 源 中 的 记录 的 SQL 语句 或 存储 过 程 。 
2. 常用 方法 

@ Dispose: 用 于 删除 DataAdapter 对 象 ， 并 释放 其 占用 的 资源 。 


Fill: 用 于 将 数据 源 中 的 数据 填充 至 指定 的 DataSet 对 象 中 。 

FillSchema: 用 于 将 DataTable 加 入 到 指定 的 DataSet 中 ， 并 配置 表 的 架构 以 匹配 
数据 源 中 的 架构 。 

GetFillParmeters: 用 于 获取 一 个 用 于 SELECT 命令 的 由 DataParameter 对 象 组 成 的 
数组 。 

Update: 在 DataSet 对 象 中 的 数据 有 所 改动 后 更 新 数据 源 ， 包 括 插入 、 删 除 、 更 新 
等 行为 。 


6.2.5 ”DataSet 对 象 


DataSet 是 ADO.NET 的 核心 组 件 之 一 ， 它 是 从 数据 源 中 检索 到 的 数据 在 内 存 中 的 一 个 
缓存 。 与 DataReader 不 同 的 是 ，DataSet 是 一 种 断 开 数据 库 连 接 的 记录 集合 ， 而 DataReader 
离 不 开 与 数据 源 的 连接 ， 它 与 底层 数据 是 紧密 联系 在 一 起 的 。 这 种 区 别 也 是 DataSet 对 象 
的 真正 价值 所 在 。 

如 果 需 要 在 不 同 的 页 面 之 间或 对 同一 页 面 的 多 次 请 示 使 用 相同 的 记录 集 ， 则 完全 可 以 
创建 一 个 DataSet 对 象 来 保存 数据 ， 并 将 其 驻 留 在 服务 器 的 缓存 中 。DataSet 对 象 不 仅 在 组 
存 中 保存 了 其 中 的 数据 ， 它 还 保留 了 数据 库 的 关系 视图 ， 包 括 一 个 或 多 个 表 以 及 表 之 间 的 
关系 、 约 束 等 。 事 实 上 ， 它 就 相当 于 一 个 完整 的 数据 库 。 

DataTable 对 象 是 DataSet 中 的 一 个 非常 重要 的 对 象 ， 就 相当 于 一 个 数据 库 表 ， 包 含 了 
DataSet 中 的 所 有 数据 。 一 个 对 应 DataTable 对 象 的 数据 表 就 是 一 堆 数据 行 (DataRow) 和 列 
(DataColumn) 的 集合 ， 同 时 它 还 包含 了 表 的 关系 (DataRelation)、 外 键 (ForeignKeyConstrainbD 
以 及 约束 (UniqueConstraint) 等 信息 。 

DataSet 对 象 的 创建 有 两 种 方法 : 通过 DataAdapter 对 象 来 填充 和 通过 代码 来 自行 创建 。 

DataSet 对 象 的 常用 属性 和 方法 如 下 。 


1. 常用 属性 


CaseSentive: 用 于 指示 对 DataTable 中 的 字符 串 进行 比较 时 是 否 区 分 大 小 写 。 
DataSetName: 用 于 返回 当前 DataSet 对 象 的 名 称 。 
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@ DefaultViewManager: 用 于 返回 一 个 DataViewManager， 后 者 包含 DataSet 中 的 数 

据 组 成 的 定制 视图 。 

EnforceConstraints: 用 于 指出 在 更 新 数据 时 是 否 应 遵守 约束 规则 。 

ExtendedProperties: 用 于 获取 一 个 包含 自 定义 用 户 信息 的 PropertyCollection 对 象 。 

HasErrors: 用 于 返回 一 个 值 ， 该 值 表示 当前 DataSet 中 的 记录 是 否 存在 错误 。 

Locale: 用 于 比较 字符 串 的 区 域 信息 ， 它 返回 一 个 CultureInfo 对 象 。 

Relations: 用 于 返回 一 个 表示 DataSet 的 表 之 间 的 所 有 关系 的 DataRelationCollection 

对 象 。 

@ Tables: 用 于 返回 一 个 代表 DataSet 中 所 有 表 的 DataTableCollection 对 象 。 

2. 常用 方法 

@ AcceptChange: 用 于 提交 在 加 载 DataSet 或 上 次 调用 AcceptChange 以 来 对 DataSet 

所 做 的 所 有 修改 。 

Clear: 用 于 删除 DataSet 中 的 所 有 记录 。 

Clone: 用 于 生成 一 个 与 当前 DataSet 相同 且 不 包含 数据 的 DataSet 对 象 。 

Copy: 用 于 生成 一 个 与 当前 DataSet 相同 且 包 含 数据 的 DataSet 对 象 。 

GetChanges: 用 于 生成 一 个 只 包含 修改 过 的 数据 的 DataSet 对 象 。 

HasChange: 用 于 返回 一 个 标识 当前 DataSet 中 的 数据 是 否 进行 了 修改 的 值 ， 这 些 

修改 包括 新 增 的 行 、 已 删除 的 行 或 已 修改 的 行 。 

@ “Merge: 用 于 将 指定 的 数据 集合 并 到 当前 的 DataSet 或 DataTable 中 。 

@ RejectChange: 用 于 撤消 自 创 建 DataSet 以 来 或 上 次 调用 AcceptChanges 以 来 对 
DataSet 所 做 的 修改 。 


6.2.6 ”DataView 对 象 


DataView 对 象 类 似 于 数据 库 中 的 视图 ， 只 是 它 所 属 的 对 象 并 不 是 实际 的 数据 库 ， 而 是 
DataSet。DataView 代表 了 一 个 DataTable 的 数据 查看 方式 ， 它 表示 DataSet 对 象 中 数据 的 
定制 视图 。 一 般 来 说 ， 数 据 默认 的 查看 方式 是 按照 数据 库 的 数据 表 中 数据 的 排列 顺序 ， 以 
表格 的 形式 显示 出 来 。 但 是 ， 对 于 用 户 而 言 ， 常 常 需要 利用 排序 (Sort)、 筛 选 (Filter)、 查 找 
(Search) 等 属性 来 定义 不 同 的 数据 查看 方式 ， 包 括 所 显示 的 数据 和 显示 的 排序 方式 ， 这 正 是 
DataView 对 象 的 价值 所 在 。 

但 是 ，DataView 对 象 不 同 于 Select 查询 语句 所 执行 的 结果 ， 它 只 是 静态 地 反映 数据 库 
中 的 数据 。 当 DataView 对 象 中 的 数据 发 生 改变 时 ， 与 其 相应 的 源 数 据 也 会 发 生 改变 。 

DataView 对 象 的 创建 方法 有 以 下 3 种 。 

@ ”使 用 DataView 对 象 的 构造 函数 ， 通 过 传 入 已 有 的 DataTable 的 参数 来 创建 。 

@ ”使 用 DataTable 类 的 DefaultView 方法 来 创建 新 的 DataView。 

@ ”根据 表 之 间 的 关系 , 例如 父子 关系 ,由 父 表 的 DataView 来 创建 子 表 的 DataView。 

DataView 对 象 的 常用 属性 和 方法 如 下 。 


1. 常用 属性 
@ AllowDelete: 用 于 设置 是 否 人 允许 删除 DataView 中 的 记录 。 


= 


e@ 
e@ 

e@ 

@ Item(Imndex 1): 上 
e@ 

@ 

@ 

@ 

2. 常用 方法 

@ 

@ 

对 象 。 

@ Delete(index): 用 
@ 

@ 

@ 


ApplyDefaultSet: 用 于 设置 是 否 使 
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AllowEdit: 用 于 设置 是 否 允 许 编辑 DataView 中 的 记录 。 
AllowNew: 用 于 设置 是 否 人 允许 通过 AddNew 方法 在 视图 中 添加 一 条 新 记录 。 


于 删除 DataView 中 由 
Dispose: 用 于 释放 DateView 对 象 的 当前 实例 。 
EndInit: 用 于 在 运行 时 结束 窗 体 上 所 使 用 的 或 男 一 个 组 件 所 使 用 的 DataView 对 象 。 
Find: 用 于 在 DataView 中 按照 指定 的 排序 关键 字 查 找 指定 的 记录 。 


默认 的 排序 方式 。 
于 返回 DataView 中 指定 的 一 条 记录 。 
RowFilter: 用 于 设置 筛选 条 件 ， 以 及 可 以 在 DataView 中 查看 哪些 行 。 
RowStateFilter: 用 于 获取 或 设置 DataView 中 的 行 状态 筛选 器 。 

Sort: 用 于 获取 或 设置 DataView 中 的 一 个 或 多 个 排序 列 及 排序 顺序 。 
Table: 用 于 获取 或 设置 数据 的 源 DataTable。 


AddNew: 用 于 在 视图 中 添加 一 条 新 的 记录 。 


BeginInit， 用 于 在 运行 时 初始 化 窗 体 上 所 使 用 的 或 另 一 个 组 件 所 使 有 


index 所 指定 的 记录 。 


~ 


的 DataView 


6.3 使 用 ADO.NET 对 象 访问 数据 库 的 两 个 实例 


在 6.2 节 中 , 介绍 了 ADO.NET 中 的 几 个 常用 对 象 。 在 本 节 中 , 将 通过 两 个 访问 数据 库 
的 简单 实例 ， 来 介绍 这 些 对 象 在 应 用 中 的 实际 操作 。 
在 介绍 实例 之 前 ， 先 来 创建 示例 数据 库 。 在 本 章 中 ， 所 有 相关 示例 均 把 该 数据 库 作为 


底层 的 数据 库 。 
打开 Access， 创 建 一 个 名 为 Friend 的 数据 库 ， 并 在 其 中 添加 一 个 数据 表 MyFriends， 
其 表 结 构 见 表 6.1 。 
表 6.1 MyFriends 数据 表 
字段 名 | 数据 类 型 字段 大 小 键 

ID 自动 编号 字号 

Name 文本 朋友 姓名 

Sex 文本 性 别 

HomeAddr 文本 家 庭 住 址 

TelPhone 文本 联系 电话 

ZipCode 文本 

Works 文本 


双击 该 表 ， 在 表 中 添加 相应 的 数据 ， 如 图 6.1 所 示 。 
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图 6.1 示例 数据 
6.3.1 ”典型 实例 : 使 用 DataAdapter 对 象 访问 数据 


不 同 的 数据 提供 程序 使 用 的 DataAdapter 类 也 不 同 。 如 果 访 问 SQL Server 7.0 及 以 上 版 
本 的 数据 库 , 可 使 用 System.Data.SqlClient 命名 空间 中 的 SqlDataAdapter 类 ; 如 果 访问 OLE 
DB 接口 的 数据 库 , 则 须 使 用 System.Data.OleDb 命名 空间 中 的 OleDbDataAdapter 类 。 这 里 ， 
将 使 用 后 者 。 

首先 ,在 Dreamweaver 8 中 新 建 一 个 ASP.NET 页 面 , 并 将 其 保存 在 数据 库 Friend 文件 
所 在 的 文件 夹 中 ， 命 名 为 UserDataAdapter.aspx。 

然后 ， 在 页 面 中 导入 System.Data 和 System.Data.OleDb 命名 空间 ， 如 图 6.2 所 示 。 


<%@ Import NaneSpace=” System. Data” %> 
<%@ Import NameSpace=" Syst em. Data. OleDb” %> 


图 6.2 导入 命名 空间 
并 在 代码 中 添加 页 面 的 Page Load 事件， 在 该 事件 中 将 实现 数据 的 获取 与 绑 定 显示 。 
1. 使 用 Connection 对 象 打开 数据 库 


在 查询 数据 之 前 , 需要 创建 Connection 对 象 , 通过 该 对 象 来 实现 与 指定 数据 库 的 连接 ， 
其 代码 如 下 : 

Dim Cnn As OleDbConnection 

Cnn=new OleDbConnection ("Provider=Microsoft.Jet.OleDb.4.0;Data Source=" & 


Server.MapPath ("Friend.mdb")) 
Cnn.open() 


这 里 ， 定 义 了 一 个 OleDbConnection 对 象 ， 并 在 连接 字符 串 中 设置 其 连接 的 数据 库 为 
Friendmdb。 然 后 ， 通 过 Connection 对 象 的 Open() 方 法 打开 数据 库 连 接 。 


2. 使 用 DataAdapter 对 象 开启 数据 表 


创建 了 数据 库 连 接 之 后 ， 则 可 使 用 DataAdapter 对 象 来 开启 数据 表 。 但 是 , DataAdapter 
对 象 必须 通过 Command 对 象 来 实现 ， 为 此 首先 要 创建 一 个 Command 对 象 ， 并 设置 其 执行 
的 SQL 语句 和 关联 的 数据 库 连 接 。 代 码 如 下 : 

Dim Cmd As OleDbCommand 

Dim dtcmd Rs OleDbDataAdapter 


Cmd=New OleDbCommand ("Select * from MyFriends order by id",Cnn) 
dtCcmd=New OleDbDataAdapter (Cmd) 
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该 段 代 码 定义 了 一 个 Command 对 象 Cmd 和 一 个 DataAdapter 对 象 dCmd， 并 设置 了 


Cmd 所 执行 的 SQL 语句 与 关联 的 数据 库 连接 Cnn, 然后 将 DataAdapter 对 象 实例 化 。 自 此 ， 
DataAdapter 对 象 已 经 创建 成 功 ， 它 已 在 DataSet 对 象 和 所 需要 查询 的 数据 源 之 间 搭 起 了 一 
座 Ls 桥梁 2 > 


3. 使 用 DataSet 对 象 存放 数据 表 
“桥梁 ”有 了 ， 接 下 来 要 做 的 就 是 通过 DataSet 对 象 来 存放 数据 。 代 码 如 下 : 


Dim DS Rs DataSet 
DS=New Dataset 
dtcmd.Fill (DS, "friend") 


在 上 面 的 代码 中 ， 定 义 了 一 个 DataSet 对 象 DS， 并 进行 了 初始 化 操作 。 然 后 ， 通 过 


DataAdapter 对 象 的 Fill0 方 法 将 其 数据 填充 至 DS 中 的 Friend 表 中 。 这 里 的 Friend 表 并 非 


固 


定 的 表 ， 用 户 可 自行 定义 其 名 称 。 此 时 ， 在 DataSet 中 的 Friend 表 中 已 经 包含 了 用 户 所 


需 数据 。 


4. 使 用 DataGrid 控件 显示 数据 表 
将 DataSet 中 的 数据 绑 定 在 页 面 上 的 一 个 很 简单 的 办 法 就 是 通过 DataGrid 控件 来 实现 。 


DataGrid 控件 是 ASPNET 中 用 得 最 多 的 数据 控件 ， 对 于 它 的 基本 语法 ， 将 在 6.4 节 中 进行 
叙述 ， 这 里 不 进行 相关 说 明 。 


首先 ， 在 ASPNET 的 <Body> 标 签 中 ， 添 加 一 个 DataGrid 控件 ， 其 定义 代码 如 下 : 
【定义 DataGrid 控件 】 


<asp:datagrid id="DataGridl" align=center runat="server" Width="544px" 
AutoGenerateColumns="False" AllowPaging="False"> 
<HeaderStyle BackColor="#D3F4FE" horizontalalign="center" font-size="11" 
font-bold="true" forecolor="#660066" /> 
<Itemstyle HorizontalAlign="Center" font-size="10" /> 
<Columns> 
<asp:BoundColumn DataField="ID" HeaderText=" 编 号 "></asp:BoundColumn> 
<asp:BoundColumn DataField="Name" HeaderText=" 姓 名 "></asp:BoundColumn> 
<asp:BoundColumn DataField="Sex" HeaderText=" 性 别 "></asp:BoundCcolumn> 
<asp:BoundColumn DataField="HomeAddr" HeaderText=" 家 庭 住址 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="TelPhone" HeaderText=" 联 系 电话 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Zipcode" HeaderText=" 邮 政 编码 "> 
</asp:BoundColumn> 
<asp:BoundCcolumn DataField="Works" HeaderText=" 工 作 单位 "> 
</asp:BoundColumn> 
</Columns> 
</asp:datagrid> 


然后 ， 在 Page_ Load 事件 中 ， 添 加 对 DataGrid 的 绑 定 ， 代 码 如 下 : 


DataGridl .DataSource=DS .Tables ("friend") 
DataGridl .DataBind() 
Cnn-Close() 
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在 上 面 的 代码 中 ， 设 置 了 DataGrid 控件 的 数据 源 为 DataSet 中 的 数据 表 Friend， 然 后 
通过 DataGrid 控件 的 DataBind0 方 法 实现 与 数据 源 的 绑 定 。 最 后 ， 别 忘 了 调用 Connection 
对 象 的 Close0 方 法 来 关闭 打开 的 数据 库 连接 。 

至 此 ， 数 据 的 获取 和 绑 定 显示 完成 ， 该 页 面 的 预览 如 图 63 所 示 。 


入 使 用 DataAdapter - Microsoft Internet Explorer 3 0 
| 文件 蝙 术 四 查看 WW) 收 总 () 工具 (D 和 ht [sl 
] "FE- "加 全 | 四 和 晤 
ktw) (8) hetp:forahost/asp netlahuseDatandapter smx 了 | 9 到 | | 链接 
习 
编号 姓名 性 别 家 庭 住址 ”联系 电话 ”邮政 编码 工作 单位 
1 “ 张 三 ” 男 ”中国 北京 “010-84657954 。 100001 中国 i 
2 地 面筋 “” 潭 南 长 小 0731-8905178 430100 
3 “ 王 五 ， 男 潮 南 长 小 13055187546 《30101 
4 | 硼 容 ” 女 ”湖南 长 小 0731-5531037 《30100 
5 淹 漳 ， 女 湖南 株洲 0733-8476548 《30302 
J 
SE 厂矿 厂区 而 mWwane 元 


图 6.3 页 面 预览 
最 后 ， 再 来 完整 地 看 一 下 本 页 面 的 全 部 代码 ， 如 下 : 


[UseDataAdapter .aspx) 
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %> 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" 
"http://www.w3.o0rg/TR/xhtml1/DTD/xhtmll-transitional.dtd"> 
<html xmlns="http://www.w3.0org/1999/xhtml"> 
<%@ Import NameSpace="System.Data" $%> 
<%@ Import NameSpace="System.Data.OleDb" %> 
<Script runat="server"> 
Private Sub Page Load(Byval Sender As Object,Byval E As EventArgs) 
Dim Cnn Rs OleDbConnection ' 定 义 Connection 对 象 
Dim Cmd As OleDbCommand ' 定 义 Commnad 对 象 
Dim dtcmd As OleDbDataAdapter ' 定 义 DataAdapter 对 象 
Dim DS Rs Dataset ' 定 义 Dataset 对 象 
If Not IsPostBack Then 
"创建 数据 库 连 接 
Cnn=new OleDbCconnection ("Provider=Microsoft.Jet.Olepb.4.0;Data 
Source=" & Server.MapPath("Friend.mdb") ) 
Cnn.open() 
"设置 Command 对 象 
Cmd=New OleDbCommand ("Select * from MyFriends order by id",Cnn) 
"设置 DataAdapter 对 象 
dtCmd=New OleDbDataAdapter (Cmd) 
DS=New Dataset 
' 将 DataRdapter 中 的 数据 填充 至 DataSet 中 
dtcmd.Fill (DS, "friend") 
"将 Dataset 绑 定 至 DataGrid 数据 控件 中 
DataGridl .DataSource=DS .Tables ("friend") 
DataGridl .DataBind() 
Cnn.Close () “关闭 数据 库 连 接 
End If 
End Sub 
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</Script> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title> 使 用 DataAdapter</title> 
</head> 
<body> 
<p align="center"><form id="Forml" runat="server"> 
<!-- 定 义 DataGrid 控件 --> 
<asp:datagrid id="DataGridl" align=center runat="server" Width="544px" 
AutoGenerateColumns="False" AllowPaging="False"> 
<HeaderStyle BackColor="#D3F4FE" horizontalalign="center" font-size="11" 
font-bold="true" forecolor="#660066" /> 
<ItemStyle HorizontalAlign="Center" font-size="10" /> 
<Columns> 
<asp:BoundColumn DataField="ID" HeaderText=" "></asp:BoundColumn> 
<asp:BoundColumn DataField="Name" HeaderText=" 姓 名 "></asp:BoundCcolumn> 
<asp:BoundColumn DataField="Sex" HeaderText=" 性 别 "></asp:BoundColumn> 
<asp:BoundColumn DataField="HomeAddr" HeaderText=" 家 庭 住址 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="TelPhone" HeaderText=" 联 系 电 话 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Zipcode" HeaderText=" 邮 政 编码 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Works" HeaderText=" 工 作 单位 "> 
</asp:BoundColumn> 
</Columns> 
</asp:datagrid> 
<!-- 结 束 DataGrid 控件 的 定义 --> 
</form></p> 
</body> 
</html> 


[= 


6.3.2 ”典型 实例 ;使 用 DataReader 对 象 访问 数据 


前 面 介绍 了 DataAdapter 对 象 的 具体 使 用 ， 接 下 来 介绍 如 何 使 用 DataReader 对 象 来 访 


问 数 据 库 中 的 数据 。 


对 于 DataAdapter 对 象 ， 根 据 数据 提供 程序 的 不 同 ， 所 使 用 的 类 也 不 同 。 对 于 SQL 


Server， 使 用 的 类 为 SqlDataAdapter; 而 对 于 OLE DB， 使 用 的 类 为 OleDbDataAdapter。 


在 Dreamweaver 8 中 新 建 一 个 ASPNET 页 面 , 并 将 其 保存 在 数据 库 Friend 文件 所 在 的 


文件 夹 中 ， 命 名 为 UserDataReader.aspx。 


然后 ， 在 页 面 中 导入 System.Data 和 System.Data.OleDb 命名 空间 ， 并 在 代码 中 添加 页 


面 的 Page Load 事件 。 


1. 使 用 Connection 对 象 打开 数据 库 
首先 ， 创 建 用 于 建立 数据 库 连 接 的 Connection 对 象 ， 此 操作 代码 与 前 一 实例 中 的 连接 


数据 的 代码 一 样 ， 如 下 : 


Dim Cnn As OleDbConnection 
Cnn=new OleDbConnection ("Provider=Microsoft.Jet.0OleDb.4.0;Data Source=" & 
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SerVver.MapPath ("Friend.mdb")) 
Cnn.open() 


2. 使 用 Command 对 象 开启 数据 表 


接 下 来 ， 创 建 Command 对 象 ， 用 于 设置 所 要 执行 的 查询 SQL 语句 ， 同 时 绑 定 关联 的 
Connection 对 象 ， 代 码 如 下 : 


Dim Cmd As OleDbCommand 
Cmd=New OleDbCommand ("Select * from MyFriends order by id",Ccnn) 


3. 使 用 DataReader 对 象 连接 数据 表 并 读 取 数 据 表 
然后 ， 创 建 DataReader 对 象 来 获取 Command 对 象 执行 所 返回 的 记录 集 。 


Dim DataR As OleDbDataReader 

DataR=Cmd .ExecuteReader () 

在 以 上 代码 中 ， 定 义 了 一 个 OleDbDataReader 对 象 DataR， 并 通过 Command 对 象 的 
ExecuteReader() 方 法 来 实现 初始 化 ,此 时 ,DataR 中 已 经 包含 了 Command 对 象 执行 查询 SQL 
语句 所 返回 的 记录 集 。 

如 前 面 所 述 ， 通 过 DataReader 对 象 的 Read() 方 法 可 以 访问 其 中 的 数据 。 下 面 ， 将 通过 
一 个 调用 Read() 方 法 的 While 循环 来 遍历 DataR 中 的 所 有 记录 , 并 依次 将 其 输出 至 页 面 上 ， 
代码 如 下 : 


While DataR.Read() 
Response .write ("<p>") 


Response.Write (DataR("id") & " " & DataR("Name") & " "&DataR("Sex") 
& "" & DataR("HomeAddr") & " " & DataR("TelPhone") & " "E& 
DataR("ZipCode") & " mn & DataR("Works")) 

Response.Write ("</p>") 

End While 


需要 注意 的 是 ， 每 执行 一 次 DataReader 对 象 的 Read() 方 法 ， 其 记录 指针 就 自动 后 移 一 
个 ， 同 时 返回 一 个 布尔 值 来 表示 是 否 已 到 了 记录 集 的 末尾 。 

由 于 页 面 数据 的 显示 均 是 在 代码 中 通过 Response.Write0 方 法 输出 ， 因 此 在 页 面 的 
<HIML> 标 记 中 无 须 添加 任何 文本 或 控件 。 

页 面 的 预览 效果 如 图 6.4 所 示 。 


EEE EE 洛 昌 作 取 
[it 世 网 rete ecston/ orp reeseDots ser ar -] mal | Ka 
到 


1 张 三 具 中 国 北京 010-84657954 100001 中 国 诚 光 科 技 发 民有 限 公 司 


3 三 五 男 湖南 长; 
4 胡 容 女 湖南 长 沙 0731-5591037 430100 暂 无 


5 济 涛 女 湖南 株洲 0733-8476548 430302 株洲 星光 科技 开发 有 限 公司 


到 
[Bid ff 厂 攻 各 wre 


6.4 页 面 预览 效果 
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本 页 面 的 完整 代码 如 下 所 示 : 
[UseDataReader .aspx) 
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %> 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" 
"http://www.w3.0org/TR/xhtml1/DTD/xhtmll-transitional.dtd"> 
<html xmlns="http://www.w3.o0rg/1999/xhtml"> 
<$sQ@ Import NameSpace="System.Data" $%> 
<$Q@ Import NameSpace="System.Data.OleDb" %> 
<Script runat="server"> 
Private Sub Page Load(Byval Sender As Object,Byval E Rs EventArgs) 
Dim Cnn As OleDbConnection ' 定 义 Connection 对 象 
Dim Cmd Rs 0leDbCommand ' 定 义 Command 对 象 
Dim DataR Rs OleDbDataReader ' 定 义 DataReader 对 象 
If Not IsPostBack Then 
"创建 数据 库 连接 
Cnn=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data 
Source=" & Server.MapPath("Friend.mdb") ) 
Cnn.open() 
"设置 Command 对 象 
Cmd=New O1eDbCommand ("Select * from MyFriends order by id",Cnn) 
"设置 DataReader 对 象 
DataR=Cmd .ExecuteReader () 
"遍历 DataReader 对 象 
While DataR.Read() 
Response .write ("<p>") 
' 输 出 当前 记录 
Response.Write (DataR("id") &g " " & DataR("Name") & " " & DataR ("Sex") 
& ""E&DataR("HomeAddr") & " " & DataR("TelPhone") & "" & DataR("ZipCode") 
& "" & DataR("Works")) 
Response.Write ("</p>") 
End While 
Cnn.Close () “关闭 数据 库 连接 
End If 
End Sub 
</Script> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title> 使 用 DataReader</title> 
</head> 
<body></body> 
</html> 


6.4 ”DataGrid 控件 的 使 用 


6.4.1 DataGrid 控件 概述 


DataGrid 控件 是 ASP.NET 中 用 得 最 多 的 一 种 数据 控件 , 它 主要 通过 表格 的 布局 方式 来 
显示 数据 。 对 于 其 布局 外 观 ， 用 户 可 以 进行 灵活 的 定义 和 设置 。 默 认 情况 下 ，DataGrid 以 
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只 读 的 模式 显示 数据 ， 但 是 用 户 也 可 设置 其 在 运行 时 自动 在 可 编辑 控件 中 显示 数据 ， 并 对 
其 进行 相应 的 编辑 。 

DataGrid 控件 必须 通过 DataSource 属性 来 绑 定 数据 源 ， 否 则 无 法 在 页 面 上 正常 呈现 。 
DataGrid 控件 的 数据 源 可 以 是 DataSet 或 数据 读 取 器 。 

默认 情况 下 ，DataGrid 控件 中 的 列 是 自动 生成 的 。 但 除 此 之 外 ，DataGrid 控件 还 可 以 
定义 显示 声明 的 列 ， 以 获得 特殊 的 效果 。 在 DataGrid 控件 中 , 可 以 定义 5 种 显示 声明 的 列 ， 
它们 分 别 是 BoundColumn 、ButtonColumn 、EditCommandColumn 、HyperLinkColumn 和 
TemplateColumn 。 

其 中 ，BoundColumn 为 绑 定 列 ， 它 表示 该 列 将 绑 定 到 数据 源 中 的 一 个 字段 ; 
ButtonColumn 为 按钮 列 ， 它 表示 该 列 中 的 每 一 项 均 为 一 个 用 户 自 定义 的 按钮 ; 
EditCommandColumn 是 一 种 特殊 的 列 类 型 ， 它 包含 了 用 于 编辑 每 行 数 据 的 各 种 编辑 命令 按 
钮 ， 如 编辑 、 更 新 、 取 消 等 ，HyperLinkColumn 为 超 链 接 列 ， 用 于 创建 绑 定 到 数据 字段 值 
的 超级 链接 的 列 ; TemplateColumn 为 模板 列 ， 其 所 创建 的 列 允 许 使 用 自 定 义 HTML 元 素 和 
控件 的 模板 来 定义 控件 的 布局 ， 该 列 也 是 所 有 显示 声明 的 列 中 使 用 最 为 灵活 、 功 能 最 为 
强大 的 列 。 

显 式 声明 的 列 与 自动 生成 的 列 可 以 同时 存在 。 当 两 者 同时 使 用 时 ， 先 显示 显 式 声 明 的 
列 ， 再 显示 自动 生成 的 列 。 对 于 自动 生成 的 列 ， 将 不 会 添加 到 Columns 集合 中 。 在 6.3 节 
的 第 一 个 实例 中 所 调用 的 DataGrid 控件 就 是 调用 的 显示 声明 的 列 。 

DataGrid 控件 的 常用 属性 如 下 。 

@ DataSource: 用 于 设置 DataGrid 控件 的 数据 源 。 

@ AllowPaging: 表示 是 否 启用 分 页 功能 ， 其 每 页 显示 的 记录 数 由 PageSize 属性 来 

指定 。 

@ ”AllowSorting: 表示 是 否 启用 排序 功能 。 

@ AutoGenerateColumns: 表示 是 否 为 数据 源 中 的 每 一 列 自动 创建 BoundColumn 
对 象 。 

BackImageUrl: 用 于 设置 DataGrid 控件 的 背景 图 像 。 

CellPadding: 用 于 设置 单元 格 的 内 容 与 单元 格 边框 之 间 的 距离 。 
CellSpacing: 用 于 设置 单元 格 与 单元 格 之 间 的 距离 。 

CurrentPageIndex: 用 于 设置 当前 显示 页 的 索引 。 

DataKeyField: 用 于 设置 由 DataSource 属性 指定 的 数据 源 中 的 主键 字段 。 
GridLines: 表示 是 否 显 示 DataGrid 控件 的 单元 格 之 间 的 边框 。 
HorizontalAlign: 表示 DataGrid 控件 的 水 平 对 齐 方 式 。 

PageSize: 用 于 设置 DataGrid 控件 每 页 所 显示 的 项 数 ， 只 有 将 DataGrid 控件 的 
AllowPaging 属性 设置 为 True， 该 属性 才 有 效 。 

ShowFooter: 表示 是 否 在 DataGrid 控件 中 显示 页 脚 。 

ShowHeader: 表示 是 否 在 DataGrid 控件 中 显示 页 眉 。 

VirtualItemCount: 用 于 设置 自 定 义 分 页 时 DataGrid 控件 的 实际 项 数 。 
AltermatingItemStyle: 用 于 设置 DataGrid 控件 中 交替 项 的 样式 。 
EditItemStyle: 用 于 设置 在 DataGrid 控件 中 选 定 来 进行 编辑 的 项 的 样式 。 
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FooterStyle: 用 于 设置 DataGrid 控件 中 脚注 部 分 的 样式 。 
HeaderStyle: 用 于 设置 DataGrid 控件 中 标题 部 分 的 样式 。 
ItemStyle: 用 于 设置 DataGrid 控件 中 各 项 的 样式 。 

PageStyle: 用 于 设置 DataGrid 控件 中 分 页 节 的 样式 。 
SelectedItemStyle: 用 于 设置 DataGrid 控件 中 当前 选 定 项 的 样式 。 


6.4.2 ”DataGrid 控件 的 应 用 实例 


在 6.4.1 节 中 ， 已 经 初步 使 用 了 DataGrid 控件 ， 但 那 仅仅 是 调用 DataGrid 控件 来 显示 
数据 ， 并 没有 更 深 地 扩展 DataGrid 控件 的 其 他 功能 。 

下 面 ， 将 在 6.4.1 节 的 第 一 个 实例 的 基础 上 ， 进 一 步 添加 DataGrid 的 其 他 强大 功能 ， 
包括 分 页 显示 和 对 数据 的 编辑 、 删 除 等 。 

对 于 DataGrid 的 分 页 显示 ， 首 先 需 要 设置 其 AllowPaging 属性 的 值 为 True， 然 后 设置 
DataGrid 控件 的 PageSize 属性 ， 该 属性 表示 每 一 页 所 显示 的 记录 数 。 接 着 需要 分 别 设置 
DataGrid 控件 的 PagerStyle-PrevPageText 属性 和 PagerStyle-NextPageText 属性 .前 者 设置 的 
文本 代表 上 一 页 的 标识 ， 而 后 者 所 设置 的 文本 则 代表 下 一 页 的 标识 。 最 后 ， 还 需 设 置 
DataGrid 控件 的 OnPageIndexChanged 事件 ， 该 事件 将 在 单 击 DataGrid 中 的 【上 一 页 】 或 

【下 一 页 】 按 钮 时 触发 。 一 般 来 说 ， 在 该 事件 中 需要 进行 两 步 操作 : 设置 DataGrid 控件 的 
CurrentPageIndex 属性 ， 然 后 重新 绑 定数 据 。 

对 于 DataGrid 控件 的 编辑 操作 , 首先 需要 在 DataGrid 中 分 别 添加 EditCommandColumn 
列 和 ButtonColumn 列 。 前 者 用 于 显示 编辑 链接 按钮 ， 并 执行 相应 的 编辑 操作 ; 后 者 则 用 于 
显示 删除 按钮 ， 并 执行 相应 的 删除 操作 。 然 后 ， 需 要 分 别 添加 DataGrid 控件 的 
OnEditCommand 事件 .OnCancelCommand 事件 .OnUpdateCommand 事件 和 OnIltemCommand 
事件 。 

其 中 ,OnEditCommand 事件 在 用 户 单 击 DataGrid 控件 的 编辑 按钮 时 触发 其 所 执行 的 
操作 主要 是 设置 DataGrid 控件 的 EditItemIndex 属性 为 当前 单 击 的 编辑 按钮 所 在 的 行 的 索 
引 。 在 执行 此 事件 之 后 ， 编 辑 按钮 将 会 转化 为 更 新 按钮 和 取消 按钮 ， 同 时 DataGrid 控件 中 
没有 设置 ReadOnly 属性 为 True 的 所 有 字段 列 均 将 显示 为 一 个 文本 编辑 框 ， 以 便 用 户 进行 
修改 。OnCancelCommand 事件 是 在 用 户 单 击 取消 按钮 时 触发 ， 其 所 执行 的 操作 主要 是 
DataGrid 控件 的 EditItemIndex 属性 设置 为 -1， 即 取消 编辑 状态 。OnUpdateCommand 事件 
是 在 用 户 单 击 更 新 按钮 时 触发 ， 其 所 执行 的 操作 是 将 用 户 对 各 文本 框 中 的 内 容 所 作 的 修改 
提交 至 数据 库 中 。OnItemCommand 事件 ， 则 主要 针对 于 删除 按钮 ， 并 在 单 击 删除 按钮 时 触 
发 ， 其 所 执行 的 操作 是 从 数据 库 中 删除 用 户 指定 的 数据 。 

下 面 ， 来 看 一 下 页 面 的 程序 代码 : 

【patacrid.aspx】 

<$sQ@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %> 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" 

"http://www.w3.0org/TR/xhtml1/DTD/xhtmll-transitional.dtd"> 

<html xmlns="http://www.w3.o0rg/1999/xhtml"> 


<s@ Import NameSpace="System.Data" $%> 
<#sQ@ Import NameSpace="System.Data.OleDb" %> 
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<Script runat="server"> 
Private Sub Page Load(Byval Sender As Object,Byval E Rs EventArgs) 
If Not IsPostBack Then 
"调用 过 程 BindpData， 将 数据 绑 定 至 DataGrid 控件 中 
BindData() 
End If 
End Sub 
" 自 定 义 过 程 BindData， 用 于 从 数据 库 中 获取 数据 并 将 其 绑 定 至 DataGrid 控件 中 
Sub BindData() 
Dim Cnn As OleDbConnection ' 定 义 Connection 对 象 
Dim Cmd Rs OleDbCommand ' 定 义 Command 对 象 
Dim dtcmd As OleDbDataAdapter ' 定 义 DataAdapter 对 象 
Dim DS Rs DataSet ' 定 义 DataSet 对 象 
， 创建 数据 库 连接 
Cnn=new OleDbConnection("Provider=Microsoft.Jet.0OleDb.4.0;Data 
Source=" & Server.MapPath ("Friend.mdb")) 
Cnn.open () 
"获取 数据 
Cmd=New OleDbCommand ("Select * from MyFriends order by id",cnn) 
dtCcmd=New OleDbDataAdapter (Cmd) 
DS=New DataSet 
dtcmd.Fill (DS, "friend") 
"将 数据 绑 定 至 DataGrid 控件 中 
DataGridl.DataSource=DS .Tables ("friend") 
DataGridl.DataBind() 
cnn.Close () “关闭 数据 库 连接 
End Sub 
"定义 删除 事件 
Sub DataGridl Mod(Sender as object,E as DataGridCommandEventArgs) 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
"获取 当前 所 要 删除 的 记录 的 ID 
dim Str_ID As String=E.Item.Cel1s(0) .Text 
dim Sql as string 
If CType (e.CommandSource,LinkButton) .CommandName="Delete" then 
"创建 数据 库 连接 
Cnn=new OleDbCconnection ("Provider=Microsoft.Jet.0OleDpb.4.0;Data 
Source=" & SerVver.MapPath ("Friend.mdb") ) 
Cnn.Open() 
"执行 删除 操作 
Sql="delete from MyFriends Where ID=" & Str_ID 
Cmd=New OleDbCcommand (Sql, Cnn) 
Cmd.executeNonQuery 
cnn.close () ' 关 闭 数据 库 连 接 
BindData() “调用 过 程 BindpData， 重 新 绑 定数 据 
End if 
End Sub 
' 定 义 更 新 事件 


Sub DataGridl Update(Sender as object,E as DataGridCommandEventArgs) 
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Dim Cnn Rs OleDbConnection 

Dim Cmd As OleDbCommand 

"获取 当前 所 要 更 新 的 记录 的 ID 

Dim str ID As String=E.Item.Cells(0).Text 

"获取 修改 后 的 姓名 列 的 值 

Dim Str Name Rs String=CType (E.Item.Cells (1) .Controls (0) ,TextBox) .Text 

"获取 修改 后 的 性 别 列 的 值 

Dim Str Sex As String=CTYpe (了 .Item.Cel1s (2) .Controls (0) ,TextBox) .Text 

"获取 修改 后 家 庭 住址 列 的 值 

Dim Str Addr As String=CType (E.Item.Cells (3) .Controls (0) ,TextBox) .Text 

"获取 修改 后 的 联系 电话 列 的 值 

Dim Str_Tel As String=CTYpe (E.Item.Cel1s (4) .Controls (0) ,TextBox) .Text 

"获取 修改 后 的 邮政 编码 列 的 值 

Dim str Zip As String=CTYpe (E.Item.Cel1s (5) .Controls (0) ,TextBox) .Text 

"获取 修改 后 的 工作 单位 列 的 值 

Dim Str Work Rs String=CType (E.Item.Cells (6) .Controls (0) ,TextBox) .Text 

Dim Sql As String 

' 创 建 数据 库 连接 

Cnn=new OleDbConnection ("Provider=Microsoft.Jet.OleDb.4.0;Data 
Source=" & Server.MapPath ("Friend.mdb")) 


Cnn.open () 

"对 数据 库 执行 更 新 操作 

Sql="Update MyFriends Set Name='" & Trim(Str_ Name) & "',Sex='" & 
Trim(Str Sex) & "',HomeAddr='" & Trim(str Addr) & "',TelPhone='" & 


Trim(Str Tel) & "',ZipCode="'" & Trim(sStr Zip) & "',Works="'" & Trim(str Work) 
& "' Where ID=" & Triml(str ID) 
Cmd=New OleDbCommand (Sql,cnn) 
Cmd .ExecuteNonQuery 
cnn.Close() “关闭 数据 库 连 接 
' 将 DataGrid 的 EditItemIndex 属性 置 为 -1， 取 消 编辑 状态 
DataGridl.EditItemIndex=-1 
BindData() “' 调 用 自 定义 过 程 BindData， 重 新 绑 定数 据 
End sub 
' 定 义 取消 事件 
Sub DataGridl Cancel (Sender as object,E as DataGridCommandEventArgs) 
' 将 DataGrid 的 EditItemIndex 属性 置 为 -1， 取 消 编辑 状态 
DataGridl.EditItemIndex=-1 
BindData() “调用 自 定义 过 程 BindData， 重 新 绑 定 数据 
End Sub 
' 定 义 编辑 事件 
Sub DataGridl Edit(Sender as object,E as DataGridCommandEventArgs) 
"设置 要 编辑 的 行 的 索引 为 当前 所 在 的 行 的 索引 
DataGridl.EditItemIndex=E.Item.ItemIndex 
BindData () 
End Sub 
"定义 分 页 事件 
Sub DataGridl PageIndexChanged (BYVal source As Object，ByVal e As 
DataGridPageChangedEventArgs) 


"设置 当前 显示 页 的 索引 
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Datagridl.CurrentPageIndex = e.NewPageIndex 
BindData() 
End Sub 
</Seript> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title> 使 用 DataGrid 控件 </title> 
</head> 
<body> 
<p align="center"> 
<form id="Forml" runat="server"> 
<asp:Datagrid id="DataGridl" align=center runat="server" Width="750px" 
AutoGenerateColumns="False" 


AllowPaging= 
PageSize="3" 
PagerSstyle-NextPageText 
Pagerstyle-PrevPageText=" 上 一 页 " 
OnPageIndexChanged="DataGridl PageIndexChanged" 
OnEditCcommand="DataGridl Edit" 
OnCancelCommand="DataGridl Cancel" 
OnupdateCommand="DataGridl Update" 
OnItemCommand="DataGridl Mod" > 
<HeaderStyle BackColor="#D3F4FE" horizontalalign="center" font-size="11" 
font-bold="true" forecolor="#660066" /> 
<ItemSstyle HorizontalAlign="Center" font-size="10" /> 
<Columns> 
<asp:BoundColumn DataField="ID" HeaderText=" 编 号 " Readonly="True" > 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Name" HeaderText=" 姓 名 "></asp:BoundColumn> 
<asp:BoundColumn DataField="Sex" HeaderText=" 性 别 "></asp:BoundColumn> 
<asp:BoundColumn DataField="HomeAddr" HeaderText=" 家 庭 住 址 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="TelPhone" HeaderText=" 联 系 电话 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Zipcode" HeaderText=" 邮 政 编码 "> 
</asp:BoundColumn> 
<asp:BoundColumn DataField="Works" HeaderText=" 工 作 单 位 "> 
</asp:BoundColumn> 
<asp:EditCommandColumn ButtonType="LinkButton" UpdateText 
HeaderText=" 编 辑 ” CancelText=" 取 消 ” EditText=" 编 辑 "> 
</asp:EditCommandColumn> 
<asp:ButtonColumn Text=" 删 除 " HeaderText=" 删 除 " CommandName="Delete"> 
</asp:ButtonColumn> 
</Columns> 
</asp:datagrid> 
</form></p> 
</body> 
</html> 


"更 新 " 
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页 面 预览 效果 如 图 6.5 所 示 。 


| 地 址 (0) [加 tp /hocahost/asp.netjelDatagnd.aspx 了 忆 贡 到 | | 链接 


编号 姓名 ”性别 家庭 住 址 “联系 电话 。 邮政 编码 工作 单位 编辑 删除 
和 张 三 男 中 国 北京 010-84657954 100001 中 国 诚 光 科 技 发 展 有 限 公司 组 轨 到 除 
2 李 四 男 湖南 长 沙 0731-8805178 430100 长 沙 三 远 软件 工作 室 组 经 。 划 险 
3 王 五 男 济南 长 沙 13055187546 430101 长 沙 三 远 软件 工作 室 编 经 。 到 除 


6.5 ”页面 预览 效果 


6.5 ”DataList 控件 和 Repeater 控件 


DataList 控件 和 Repeater 控件 , 也 是 ASP.NET 中 两 个 常用 的 数据 控件 。 其 中 ，DataList 
控件 主要 用 于 通过 模板 来 显示 数据 ， 而 Repeater 控件 则 可 以 采用 更 自由 的 方式 来 控制 数据 
的 显示 。 


6.5.1 ”DataList 控件 


DataList 控件 主要 用 于 通过 模板 来 显示 数据 。DataList 控件 所 显示 的 数据 的 格式 ， 都 可 
在 DataList 控件 所 提供 的 模板 中 包括 AltermatingItemTemplate 、EditItemTemplate 、 
FooterTemplate、 HeaderTemplate、 ItemTemplate、 SelectedItemTemplate、SeparatorTemplate 等 。 

其 中 ，AlternatingItemTemplate 模板 主要 用 于 控制 交替 行 所 显示 的 文本 和 控件 样式 ; 
EditItemTemplate 模板 主要 用 于 控制 处 于 编辑 状态 下 的 项 的 文本 和 控件 样式 ; 
FooterTemplate 模板 主要 用 于 控制 DataList 控件 的 脚注 所 显示 的 文本 和 控件 样式 ; 
HeaderTemplate 模板 主要 用 于 控制 DataList 控件 的 标 头 所 显示 的 文本 和 控件 样式 ; 
ItemTemplate 模板 主要 用 于 控制 DataList 控件 中 的 每 一 行 所 显示 的 文本 和 控件 样式 ; 
SelectedItemTemplate 模板 主要 用 于 控制 用 户 所 选中 的 DataList 控件 的 一 项 所 显示 的 文本 和 
控件 样式 ，SeparatorTemplate 模板 主要 用 于 控制 DataList 控件 中 各 项 间 分 隔 符 的 样式 。 

通过 定义 各 种 不 同 的 模板 ， 可 以 完全 自 定 义 DataList 控件 的 外 观 样式 和 显示 内 容 。 

DataList 控件 的 常用 属性 如 下 。 

@ AlteratingItemStyle: 用 于 获取 DataList 控件 中 交替 项 的 样式 属性 。 
AlteratingItemTemplate: 用 于 获取 或 设置 DataList 控件 中 交替 项 的 模板 。 
EditItemIndex: 用 于 获取 或 设置 DataList 控件 中 所 要 编辑 的 选 定 项 的 索引 号 。 
EditItemStyle: 用 于 获取 DataList 控件 中 为 进行 编辑 而 选 定 的 项 的 样式 属性 。 
EditItemTemplate: 用 于 获取 或 设置 DataList 控件 中 为 进行 编辑 而 选 定 的 项 的 模板 。 
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@ ”FooterStyle: 用 于 获取 DataList 控件 的 脚注 部 分 的 样式 属性 。 

@ ”FooterTemplate: 用 于 获取 或 设置 DataList 控件 的 脚注 部 分 的 模板 。 

e@ ”GridLines: 用 于 获取 或 设置 DataList 控件 的 网 格 线 样式 ， 此 属性 仅 当 DataList 控 
件 的 RepeatLayout 属性 设置 为 RepeatLayout.Table 时 有 效 。 

HeaderStyle: 用 于 获取 DataList 控件 的 标题 部 分 的 样式 属性 。 

HeaderTemplate: 用 于 获取 或 设置 DataList 控件 的 标题 部 分 的 模板 。 

Items: 用 于 获取 表示 控件 内 单独 项 的 DataListItem 对 象 的 集合 。 

ItemStyle: 用 于 获取 DataList 控件 中 项 的 样式 属性 。 

ItemTemplate: 用 于 获取 或 设置 DataList 控件 中 项 的 模板 。 

RepeatColumns: 用 于 获取 或 设置 要 在 DataList 控件 中 显示 的 列 的 数量 。 
RepeatDirection: 用 于 获取 或 设置 DataList 控件 的 显示 是 垂直 方向 显示 还 是 水 平方 
向 显示 。 

RepeatLayout: 用 于 获取 或 设置 DataList 控件 是 在 表 中 显示 还 是 在 流 布局 中 显示 ， 
其 属性 值 包括 RepeatLayout.Table( 以 表 的 形式 显示 ) 和 RepeatLayout Flow( 以 流 布 
局 的 形式 显示 )。 

SelectedIndex: 用 于 获取 或 设置 DataList 控件 中 选 定 项 的 索引 。 

SelectedItem: 用 于 获取 DataList 控件 中 的 选 定 项 。 

SelectedItemStyle: 用 于 获取 DataList 控件 中 选 定 项 的 样式 属性 。 
SelectedItemTemplate: 用 于 获取 或 设置 DataList 控件 中 选 定 项 的 模板 。 
SeparatorStyle: 用 于 获取 DataList 控件 中 各 项 间 的 分 隔 符 的 样式 属性 。 
SeparatorTemplate: 用 于 获取 或 设置 DataList 控件 中 各 项 间 的 分 隔 符 的 模板 。 
ShowFooter: 用 于 获取 或 设置 是 否 在 DataList 控件 中 显示 脚注 部 分 。 

ShowHeader: 用 于 获取 或 设置 是 否 在 DataList 控件 中 显示 页 眉 节 。 


6.5.2 Repeater 控件 


Repeater 控件 可 以 使 用 非 表 格 的 形式 来 显示 数据 ， 从 而 能 够 非常 灵活 地 定义 其 显示 的 
风格 。 对 于 Repeater 控件 来 说 ， 它 相当 于 一 个 基本 容器 控件 ， 它 没有 内 置 的 布局 或 样式 ， 
因此 必须 在 模板 中 显 式 声明 所 有 的 HTML 布局 、 格 式 设 置 和 样式 标记 。 此 外 ， 与 DataList 
控件 和 DataGrid 控件 不 同 的 是 ，Repeater 控件 没有 内 置 的 选择 和 编辑 支持 ， 用 户 需 通过 
Repeater 控件 的 ItemCommand 事件 来 处 理 从 模板 引发 到 该 控件 的 控件 事件 。 

在 Repeater 控件 中 ， 提 供 了 五 种 不 同类 型 的 模板 : AltematingItemTemplate 、 
FooterTemplate 、 HeaderTemplate 、 ItemTemplate 和 SeparatorTemplate 。 其 中 ， 
AltematingItemTemplate 模板 用 于 控制 交替 项 内 容 和 布局 ，FooterTemplate 模板 用 于 控制 列 
表 注 脚 的 内 容 和 布局 ; HeaderTemplate 模板 用 于 控制 列表 标 头 的 内 容 和 布局 ; ItemTemplate 
模板 用 于 控制 列表 中 各 项 目的 内 容 和 布局 ，SeparatorTemplate 模板 则 用 于 控制 呈现 在 
各 项 之 间 的 内 容 和 布局 。 在 以 上 模板 中 ，ItemTemplate 模板 是 必 选 模板 ， 而 其 他 模板 则 可 
有 可 无 。 

Repeater 控件 的 常用 属性 如 下 。 

®@ AltematingItemTemplate: 用 于 获取 或 设置 Repeater 控件 中 的 交替 项 的 模板 。 
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DataMember: 用 于 获取 或 设置 DataSource 中 要 绑 定 到 Repeater 控件 的 特定 表 。 
DataSource: 用 于 获取 或 设置 为 填充 Repeater 控件 提供 数据 的 数据 源 。 
FooterTemplate: 用 于 获取 或 设置 Repeater 控件 中 的 注脚 部 分 的 模板 。 
HeaderTemplate: 用 于 获取 或 设置 Repeater 控件 中 的 标 头 部 分 的 模板 。 

Items: 用 于 获取 Repeater 控件 中 的 所 有 项 的 集合 。 

ItemTemplate: 用 于 获取 或 设置 Repeater 控件 中 的 各 项 目的 模板 。 


6.6 ”典型 实例 : 使 用 DataList 
和 Repeater 控件 绑 定数 据 源 


在 6.5 节 中 ， 大 家 对 DataList 控件 和 Repeater 控件 已 经 有 了 一 个 初步 的 了 解 。 在 本 节 
中 ， 将 通过 一 个 具体 的 实例 来 介绍 DataList 控件 和 Repeater 控件 的 实际 应 用 。 

在 此 实例 中 ， 将 分 别 创建 一 个 DataList 控件 和 Repeater 控件 ， 并 将 它们 绑 定 至 同一 数 
据 源 上 ， 该 数据 源 与 本 章 前 面 示例 的 数据 源 完全 一 样 。 

页 面 代码 如 下 : 


[DataList Repeater.aspx) 
<%Q@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %> 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" 
"http://www.w3.0org/TR/xhtml1/DTD/xhtmll-transitional.dtd"> 
<html xmlns="http://www.w3.0org/1999/zxhtml"> 
<%@ Import NameSpace="System.Data" 多 > 
<%@ Import NameSpace="System.Data.OleDb" $%> 
<Script runat="server"> 
Private Sub Page Load(Byval Sender As Object,Byval E As EventArgs) 
If Not IsPostBack Then 
BindData() “' 调 用 自 定义 过 程 BindData， 比 定数 据 
End If 
End Sub 
Sub BindData() 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim dtcmd As OleDbDataAdapter 
Dim DS As Dataset 
' 创 建 数 据 库 连 接 
Cnn=new OleDbConnection ("Provider=Microsoft.Jet.O0leDb.4.0;Data 
Source=" & Server.MapPath ("Friend.mdb")) 
Cnn.open () 
"查询 数据 
Cmd=New OleDbCommand ("Select * from MyFriends order by id",Cnn) 
dtCcmd=New OleDbDataAdapter (Cmd) 
DS=New Dataset 
dtcmd.Fill (DS, "friend") 
"将 数据 绑 定 至 DataList 控件 中 
DataList1l1.DataSource=DS .Tables ("friend") 
DataList1.DataBind() 
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"将 数据 绑 定 至 Repeater 控件 中 
Repeater1l.DataSource=DS .Tables ("friend") 
Repeaterl .DataBind() 
Cnn.Cclose() 
End Sub 
</Script> 
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 
<title> 使 用 DataList 控件 和 Repeater 控件 </title> 
</head> 
<body> 
<form id="Forml" runat="server"> 
center"><font color="#0000FF"><b> 使 用 DataList 控件 </b></font></p> 
"center"> 
<asp:DataList id="DataListl" runat="server" width="480" 
BorderColor="black" CellPadding="5" RepeatLayOut=Table RepeatColumns="3" 
GridLines="Both" Font-Size="11pt"> 
<Headerstyle BackColor="#aaaadd"></Headerstyle> 
<HeaderTemplate><center><b> 我 的 朋友 </b></center></HeaderTemplate> 
<ItemTemplate> 
<%# Container.DataItem("Name") 和 > 
</ItemTemplate> 
</asp:DataList></p><br /> 
<p align="center"><font color="#0000FF"><b> 使 用 Repeater 控件 </b></font></p> 
<p align="center"> 
<asp:Repeater id= 
<HeaderTemplate> 
<Table width="80%" border="0" style="font-size:14px"> 
<tr height="30"> 
<th> 姓 名 </th><th> 性 别 </th><th> 家 庭 住址 </th><th> 联 系 电话 </th><th> 邮 政 编 码 
</th><th> 工 作 单 位 </th> 
</tr> 
</HeaderTemplate> 
<ItemTemplate> 
<tr height="30"> 
<td align="center"><%# Container.DataItem("Name") %></td> 
<td align="center"><%# Container.DataItem("Sex") %$></td> 
<td><%# Container.DataItem ("HomeAddr") $%></td> 
<td><%# Container.DataItem("TelPhone") $%></td> 
<td align="center"><%# Container.DataItem("Zipcode") %></td> 
<td><%# Container.DataItem("works") %></td> 
</tr> 
</ItemTemplate> 
<AlternatingItemTemplate> 
<tr bgcolor="#CCFFFF"> 
<td align="center"><%# Container.DataItem("Name") %></td> 
<td align="center"><%# Container.DataItem("Sex") %></td> 
<td><%# Container.DataItem ("HomeAddr") %></td> 
<td><%# Container.DataItem("TelPhone") %></td> 
<td align="center"><%# Container.DataItem("Zipcode") $%></td> 
<td><%# Container.DataItem ("works") %></td> 


Repeaterl" Runat="Server"> 
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</tr> 
</AlternatingItemTemplate> 
<FooterTemplate></table></FooterTemplate> 
</asp:Repeater></p> 
</form> 
</body> 
</html> 


在 代码 中 ， 表 达 式 <%# Container.Dataltem(" 字 段 名 ")%> 是 DataList 控件 和 Repeater 控 
件 中 的 一 个 非常 关键 的 要 素 , 它 用 于 获取 绑 定 的 数据 源 中 指定 字段 的 值 。 该 表达 式 也 可 使 用 
表达 式 <%# DataBinder.Eval(Container.DataItem," 字 段 名 ") %> 来 蔡 换 , 两 者 代表 同样 的 含义 。 

从 以 上 代码 可 以 看 出 ，DataList 控件 比 Repeater 控件 更 简单 。 但 是 ，Repeater 控件 却 具 
有 更 为 强大 的 灵活 性 和 可 扩展 性 。 同 时 ，Repeater 控件 对 设计 人 员 在 HTML 语言 方面 的 掌 
握 程 度 也 要 求 更 高 。 

页 面 的 预览 效果 如 图 6.6 所 示 。 


ET TRE J 3RX 司 共 上 枉 


[JETTTTETTTTEZTEZEE3 可 | 他 
使 用 DataList 控 件 
张 三 亚 到 洲 洲 
于 四 i 
使 用 Repeater 控 件 
姓名 ”性别 。 家 庭 住址 联系 电话 瞩 政 编码 工作 单位 
线 = 男 中 国 t 京 010-84657954 100001 中 国法 光 利 技 发 展 有 限 公司 
于 四 男 湖 雨 长 沙 0731-6805319 490100 长 沙 三 远 软 件 工作 室 
五 男 湖南 长 沙 18055187545 490101 长 沙 三 远 软 件 工作 宇 
骨 窜 六 湖南 长 沙 0731-56591037 430100 暂 无 
芷 话 。 文 湖南 祭 洲 0733-8496548 4%0%02 栋 洲 星光 科技 开发 有 限 公司 
引 
厢 王 厂 厂 厂区 各 wre | 


图 6.6 页 面 预览 效果 
6.7 习 题 
(1) 练习 ADO.NET 的 几 种 常用 对 象 的 具体 使 用 。 
(2) 练习 如 何 直接 通过 代码 来 创建 DataSet 对 象 。 


(3) 扩展 6.4.2 小 节 中 的 DataGrid 应 用 实例 ， 添 加 DataGrid 的 排序 功能 。 
(4) 扩展 6.6 节 典 型 实例 ， 在 DataList 控件 和 Repeater 控件 中 添加 分 页 功能 。 
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通过 前 面 章 节 的 学 习 ， 相 信 读 者 对 Dreamweaver 8 和 ASPNET 以 及 Access 数据 库 都 
有 了 一 个 基本 的 了 解 .在 后 续 的 章节 中 ,将 为 大 家 介绍 如 何 通 过 Dreamweaver 8 和 ASPNET 
来 开发 Web 应 用 程序 ， 包 括 留 言 夭 、 网 络 相册 、 网 站 会 员 系 统 、 同 学 录 、 新 闻 发 布 系统 以 
及 目前 流行 的 博客 系统 等 。 

留言 簿 一 直 是 网 站 的 重要 组 成 部 分 ， 它 为 浏览 者 与 网 站 管理 员 提 供 了 一 个 直接 进行 交 
流 的 通道 。 本 章 ， 将 介绍 如 何 通过 Dreamweaver 和 ASP.NET 来 开发 留言 簿 系统 。 


7.1 系统 分 析 


7.1.1 系统 功能 


留言 敌 作 为 浏览 者 与 网 络 管理 员 交 互 的 桥梁 ,浏览 者 可 以 发 表 自 己 的 浏览 信息 ， 查 看 
管理 员 的 回复 以 及 他 人 的 留言 和 相关 回复 ; 而 管理 员 可 以 对 留言 进行 管理 , 包括 回复 留言 、 
删除 留言 等 。 

由 于 留言 短 是 面向 所 有 浏览 者 ， 为 了 保证 留言 信息 的 个 人 隐私 ， 因 此 浏览 者 在 发 表 留 
言 时 可 使 用 “悄悄 话 ” 功 能 ， 即 该 留言 仅 管理 员 和 自己 可 以 看 到 ， 而 其 他 浏览 者 无 法 看 到 。 
此 外 ， 对 于 某 些 留言 ， 如 果 涉 及 公共 道德 或 他 人 隐私 ， 则 管理 员 也 可 对 其 进行 屏蔽 。 屏 蔽 
与 删除 的 区 别 在 于 ， 前 者 并 不 删除 留言 信息 ， 而 仅仅 是 屏蔽 其 留言 内 容 ， 使 他 人 无 法 看 到 ， 
后 者 则 是 将 留言 信息 彻底 删除 ， 不 留 痕迹 。 

这 里 ， 将 留言 秒 系 统 的 功能 划分 为 前 台 页 面 功能 和 后 台 页 面 功能 。 前 台 页 面 功能 是 指 
一 般 浏 览 者 可 以 直接 操作 的 功能 ， 而 后 台 页 面 功 能 是 面向 管理 员 的 ， 只 有 进行 登录 并 确认 
身份 后 才 可 进行 操作 。 事 实 上 ， 对 于 网 站 中 的 大 多 数 的 Web 应 用 程序 ， 均 有 前 台 和 后 台 之 
分 。 通 过 后 台 ， 管 理 员 可 以 对 一 般 用 户 在 前 台所 操作 的 信息 进行 管理 。 


1. 前 台 页 面 功能 


前 台 页 面 主要 针对 一 般 浏 览 者 ， 其 功能 包括 发 布 留言 和 浏览 留言 。 
1) 发布 留言 
发 布 新 的 留言 ,其 内 容 包括 留言 标题 、 留 言 人 、 性 别 、 个 人 头像 、 邮 箱 地 址 、 联 系 QQ、 
个 人 主页 、 留 言 表情 和 留言 内 容 ， 以 及 悄悄 话 等 。 
2 浏览 留言 
浏览 所 有 的 留言 以 及 管理 员 的 相关 回复 内 容 。 在 此 功能 中 ， 需 注意 留言 是 否 为 悄悄 话 
和 否 已 被 管理 员 屏 蔽 。 如 果 留 言 被 设置 为 悄悄 话 , 则 当 一 般 用 户 浏览 时 ,应 向 其 显示 “此 
留言 为 情 情 话 ”， 而 对 管理 员 则 显示 真实 的 留言 内 容 。 如 果 留 言 已 被 管理 员 屏蔽 ” 则 应 向 
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浏览 者 显示 “此 留言 已 被 管理 员 屏 项 ” 

2. 后 台 页 面 功 能 

后 台 页 面 主要 针对 管理 员 ， 其 功能 包括 管理 员 登 录 、 回 复 留 言 、 删 除 留 言 和 屏蔽 留言 。 

1) “管理 员 登 录 

提供 管理 员 的 登录 界面 ， 通 过 在 页 面 上 所 输入 的 用 户 名 和 用 户 密码 来 确认 管理 员 的 真 
实 身份 。 一 旦 核实 正确 ， 则 进行 管理 页 面 ， 和 否则， 提示 相应 的 错误 信息 。 

2) 回复 留言 

对 指定 的 留言 进行 回复 ， 其 信息 包括 回复 内 容 和 回复 时 间 。 如 果 过 去 已 对 指定 的 留言 
进行 过 回复 ， 则 可 对 回复 的 内 容 进 行 修改 ， 并 覆盖 过 去 的 回复 信息 。 

3) ”删除 留言 

对 于 指定 的 留言 信息 ， 将 其 从 数据 库 中 彻底 删除 。 

4) “屏蔽 留言 

对 于 不 健康 或 涉及 他 人 隐私 的 留言 信息 ， 将 其 状态 设置 为 屏蔽 ， 以 确保 该 留言 信息 不 
会 在 留言 浏览 页 面 中 显示 其 真实 的 留言 信息 。 


7.1.2 ”数据库 的 建立 


本 系统 采用 Microsoft Access 2000 作为 数据 库 ， 数 据 库 名 为 DataMdb， 在 该 数据 库 中 
添加 了 UserInfo( 管 理 员 信 息 表 )、LYInfo( 留 言 信息 表 )、FaceInfo( 可 选 头 像 信 息 表 ) 和 
BiaoQing( 可 选 表情 信息 表 )4 个 数据 表 。 

1. 管理 员 信息 表 (UserInfo) 

UserInfo 数据 表 主 要 用 于 存储 管理 员 的 基本 信息 ， 其 表 结 构 见 表 7.1。 

表 7.1 Userlnfo 数据 表 


TE TT TE 


UserName 


UserPwd 


LYInfo 数据 表 主 要 用 于 存储 留言 内 容 ， 这 也 是 本 系统 中 最 关键 和 最 重要 的 数据 表 ， 其 
表 结 构 见 表 7.2。 


表 7.2 LYinfo 数据 表 
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字段 名 数据 类 型 字段 描述 字段 大 小 | 默认 值 | 主键 
Sex 文本 留言 人 的 性 别 4 
QQ 文本 留言 人 的 联系 QQ 50 
文本 留言 人 的 邮箱 地 址 100 


Homepage 文本 留言 人 的 个 人 主页 
Title 文本 留言 主题 
Content 备注 


Ddate 日 期 时间 
Reply 备注 
ReplyDate 日 期 时 间 | 回复 时 间 

留言 人 头像 的 ID, 对 应 于 FaceInfo 
数据 表 中 的 ID 字段 
留言 表情 的 ID， 对 应 于 BiaoQing 
数据 表 中 的 ID 字段 
是 否 为 悄悄 话 ; 其 值 为 1 表示 此 留 
言 为 悄悄 话 ， 为 0 表示 非 悄悄 话 
是 否 屏蔽 ; 其 值 为 1 表示 此 留言 已 
被 管理 员 屏 蔽 ， 为 0 表示 正常 


FaceID 数字 


BiaoQingID 数字 


Tag_Hide 文本 


说 明 : 字段 Ddate 的 默认 值 为 系统 函数 Now()， 该 函数 用 于 系统 的 当前 时 间 。 即 在 添加 新 
记录 时 ， 如 果 没 有 为 字段 Ddate 指定 数据 ， 则 获取 系统 的 当前 时 间作 为 字段 的 值 。 


3. 可 选 头像 信 息 表 (FaceInfo) 
FaceInfo 数据 表 主 要 用 于 存储 可 选 头像 的 相关 信息 ， 其 表 结 构 见 表 7.3。 
表 7.3 Facelnfo 数据 表 


字段 名 还 E 键 
ID 长 整 型 
头像 名 称 
PicAddr < 头像 所 对 应 的 图 片 地 址 50 


4. 表情 信息 表 (BiaoQing) 

BiaoQing 数据 表 主 要 用 于 存储 留言 所 用 表情 图 标的 相关 信息 ， 其 表 结 构 见 表 7.4。 

事实 上 ， 可 选 头 像 信 息 表 (FaceInfo) 和 表情 信息 表 (BiaoQing) 均 不 是 系统 必要 的 数据 表 。 
在 添加 留言 信息 时 ， 用 户 可 指定 固定 的 头像 图 片 和 表情 图 片 ， 但 那样 势必 给 系统 的 后 期 维 
护 带 来 不 便 。 一 旦 需要 添加 新 的 头像 和 表情 ， 均 需 修改 系统 相关 的 文件 源 代码 ， 这 是 非常 
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麻烦 的 。 因 此 ， 为 了 保持 系统 良好 的 可 扩展 性 ， 这 里 将 头像 图 片 和 表情 图 片 的 相关 信息 通 
过 数据 表 来 存储 。 用 户 只 需 在 后 台 功能 页 面 中 添加 头像 图 片 和 表情 图 片 ， 前 台 的 添加 留言 
页 面 即 可 自动 更 新 。 


表 7.4 BiaoQing 数据 表 


字段 描述 
留言 表情 编号 
留言 表情 所 对 应 的 图 片 地 址 


7.1.3 站 点 设置 


在 正式 介绍 系统 功能 的 实现 之 前 ， 必 须 做 一 些 准 备 工 作 ， 这 就 是 对 站 点 的 设置 ， 这 一 
步 也 是 通过 Dreamweaver 8 开发 基于 ASPNET 的 Web 应 用 程序 的 前 提 。 

在 第 2 章 中 ， 对 站 点 的 设置 进行 了 详细 的 讲解 ， 这 里 就 不 再 歼 述 。 本 例 中 ， 站 点 设置 
的 本 地 信息 如 图 7.1 所 示 。 


分 站 本 地 信息 


网 E77 7 
本 地 根 交 件 志 E) 民 hook\SP JT DNboon expie\E 
se 万 自动 习 新 丰 地 文件 列表 四) 
LT TIITCTTTOTLEITGTE 
全 按 相 对 于 :6 文档 四 广 站 点 根 目录 G) 
JE 地 址 0D; ttp /ioeslosviy 
HT 
和 
区 分 大 小 写 的 链接 : 厂 使 用 区 分 大 小 写 的 链接 村 查 UD 
强 存 : 厅 甩 用 独 存 四) 


8 


Ce] ww | ww | 


图 7.1 本 地 信息 


其 中 ，【 站 点 名 称 】 设 置 为 “留言 禾 ”，【 本 地 根 文件 夹 】 设 置 为 留言 簿 系统 所 在 的 
磁盘 目录 , 【默认 图 像 文件 夹 】 则 设置 为 留言 簿 系统 下 的 pic 文件 夹 。 此 外 ，【HTTP 地 址 】 
设置 为 http://localhost/lyb， 这 意味 着 在 此 之 前 须 将 留言 簿 系统 设置 为 Web 共享 ， 其 共享 名 
为 lyb， 这 样 便 可 通过 该 HTTP 地 址 来 访问 留言 簿 。 

站 点 设置 中 ， 远 程 信息 设置 如 图 7.2 所 示 。 

由 于 对 留言 簿 系统 的 设计 、 测 试 和 运行 均 是 在 本 机 上 操作 的 ， 因 此 这 里 将 访问 方式 设 
置 为 【本 地 /网 络 】， 而 远 端 文件 夹 则 与 本 地 根 文件 夹 设置 为 相同 的 目录 。 
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7.2 ”远程 信息 
站 点 设置 中 ， 测 试 服务 器 设置 如 图 7.3 所 示 。 


图 7.3 测试 服务 器 


请 注意 ， 如 果 需 要 Dreamweaver 8 来 调用 数据 库 中 的 动态 数据 ， 则 测试 服务 器 是 必须 
设置 的 ， 否 则 无 法 对 程序 进行 部 署 。 在 这 里 ， 同 样 将 测试 服务 器 文件 夹 设置 为 与 本 地 文件 
夹 相 同 的 目录 。 

站 点 设置 完成 后 ， 还 有 一 步 极为 重要 的 操作 ， 那 就 是 站 点 的 部 署 。 对 于 大 多 数 的 初学 
者 ， 往 往 容 易 将 此 步 操作 忽略 ， 结 果 导 致 程 序 无 法 正常 运行 。 

所 谓 站 点 的 部 署 ， 实 质 上 是 部 署 DreamweaverCtrls.dll 控件 。 该 控件 属于 复合 控件 ， 是 
Dreamweaver 8 在 ASPNET 页 面 中 用 于 处 理 数据 的 关键 控件 。 事 实 上 ， 在 Dreamweaver 8 
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中 ， 所 有 的 ASP.NET 核心 程序 都 已 集成 在 DreamweaverCtrls.dll 控件 中 。 

如 果 没 有 部 署 DreamweaverCtrls.dll 控 件 至 应 用 程序 根 目录 下 的 Bin 目 录 中 (即使 在 页 面 
中 插入 了 数据 集 和 数据 网 络 ， 并 且 在 数据 集 对 话 框 中 测试 时 能 读 出 数据 )， 则 在 页 面 实际 浏 
览 时 将 始终 会 看 到 “系统 找 不 到 指定 的 文件 ”之 类 的 错误 信息 ， 如 图 7.4 所 示 。 


| XHE RD Ey EE IRD PWS | 
] +FE "~" 同 间 分 | 和 WN 天 寻 交 伯 与 
mr 可 Cs || 锋 


Server Error in '/lyb' Application. 


Parser Error 


Doscription: An anror occurred rng tho parspg ot a resarce tog ec bh sevice ne toquect Pooso rw tne folo ring speofe poree emor dctaito and ncdfy your source 
fie oppropretehy 


He eee wastroreaeanrenlonraienriaaamaiaanieraad 
入 


Source File: Nobefeubest aspx Line: 2 


hssombly Load Trace: he oiewma rometon ean 加 hide wn ne esseroy Troaneavact Vashane 9 90, Cuterreural 
PublckerTohrr0361000cde05640n ct 


Mans Aprenbly bineipg, ep 1s umned or 

nadie astonbly PYra Pa More”15391n9, eisgaf pare torore Vueron Enab Jetog] (Owes) to 1 
Mare Tere si Cor fommance pea ee i trae 
To turn hie Feature ff, rerove Ehe ragiat 


ie TNRLNN SoP tware i croooft NFusdon! Enabl eLog] ， 


Version Information: Miercsot NET Franenert yatser2059727 43 ASPIETYersan2050727 2 


i i 2 : | 


图 7.4 ”错误 信息 

下 面 ， 就 来 部 署 DreamweaverCtrls.dll 控件 。 

(1) 选择 【文件 】| 【新 建 】 命 令 ， 将 弹出 【新 建文 档 】 对 话 框 ， 如 图 7.5 所 示 。 

(2) 在 【类 别 】 列 表 框 中 选择 【动态 页 】， 在 【动态 页 】 列 表 框 中 选择 ASPNET VB， 
然后 单 击 【 创 建 】 按钮 ， 这 样 即 可 创建 一 个 基于 VB.NET 语言 的 ASPNET 页 面 。 此 时 , 在 
页 面 的 【设计 】 视 图 中 将 是 一 片 空白 ， 因 为 还 没有 添加 任何 元 素 。 

(3) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【 绑 定 】 面 板 ， 如 图 7.6 所 示 。 


第 起 | 模板 | 
关中 WE: 
EF Sr Jovseript 
恒 ASP Vhseript 
模板 ASP WET OF 
其 地 
eastS ap i 
页 面 设计 (Css) | 时 车 要 在 该 页 面 上 使 用 动态 数据 : 
mie | A 
2。 选择 一 种 立 挡 类 型 
3。 设置 站 点 的 测 这 服务 器 
三 | ”“ 细 垃 
XD): 
[rr | 
和 和 助 | 首 夺 9 | ES Cs] ws | 
图 7.5 【新 建文 档 】 对 话 框 图 7.6 【 绑 定 】 面 板 
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(4) 单 击 【 部 署 】 链 接 ， 将 弹出 【将 支持 文件 部 署 到 测试 服务 器 】 对 话 框 ， 如 图 7.7 


所 示 。 
(5) 单 击 【 文 件 夹 】 按 钮 回 ， 在 弹出 的 对 话 框 中 ， 选 择 程序 目录 下 的 Bin 文件 夹 ， 然 


后 单 击 【部 署 】 按 钮 ， 此 时 系统 将 弹出 一 个 对 话 框 提示 部 署 成 功 ， 如 图 7.8 所 示 。 


中富 | 
录 中 。 in 目 取消 


访问 多 庄 地 /| 


/bin 交 件 丑 0)，[ 加)\bock\ex wple\ 留 计生 bin\ 加 


图 7.7 【将 支持 文件 部 署 到 测试 服务 器 】 对 话 框 7.8 部 署 成 功 
打开 留言 秒 根 目录 下 的 Bin 目录 ， 可 以 发 现 其 中 多 了 一 个 DreamweaverCtrls.dll 文件 。 
至 此 ， 站 点 的 部 署 工 作成 功 完成 。 


7.2 留言 筹 的 前 台 页 面 制 作 


留言 簿 的 前 台 页 面包 括 浏 览 留言 页 面 和 添加 留言 页 面 ， 其 对 应 的 文件 分 别 为 
Default.aspx 和 Ly_Add.aspx。 
7.2.1 浏览 留言 页 面 


1. 页面 布局 设计 
下 面 ， 来 看 一 下 浏览 留言 页 面 的 制作 。 
(1) 选择 【文件 】 【新建 】 命 令 ， 将 弹出 【新 建文 档 】 对 话 框 ， 如 图 7.9 所 示 。 


E73 
i 

文档 关 型 0rD): 

[am lo ramsiuaa 可 


和 有 助 | 首 寺 3 数 四 更 内容 职 汉 


7.9 【新 建文 档 】 对 话 框 


人 
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(2) 在 【类 别 】 列 表 框 中 选择 【动态 页 】， 在 【动态 页 】 列 表 框 中 选择 ASPNET VB， 
然后 单 击 【 创 建 】 按 钮 ， 这 样 即 可 创建 一 个 基于 VB.NET 语言 的 ASPNET 页 面 。 此 时 , 在 
页 面 的 【设计 】 视 图 中 将 是 一 片 空白 ， 因 为 我 们 还 没有 添加 任何 元 素 。 

(3) 在 【设计 】 视 图 中 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【页 面 属性 】 命 令 ， 在 弹出 的 
【页 面 属 性 】 对 话 框 中 ， 将 背景 闫 色 值 设置 为 “#9898BA”， 上 边 距 设置 为 10 像素 ， 如 
图 7.10 所 示 。 
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图 7.10 【页 面 属性 】 对 话 框 


(4) 单 击 【确定 】 按 钮 ， 完 成 页 面 的 设置 。 在 页 面 的 【属性 】 面 板 中 ， 打 开 【 样 式 】 
下 拉 列 表 框 ， 选 择 【 附 加 样式 表 】 选 项 ， 将 弹出 如 图 7.11 所 示 的 对 话 框 。 


文件 /ML 加 :下 :symwn cs 习 ae |] 
添加 为 : G 链接 届 ) 预览 


CS 入 四 了 
57 可 2 
悠 也 可 以 铺 入 去 号 分 隔 的 媒体 类 型 列 表 。 


Drewmweaver 的 范例 样式 可 可 以 帮助 修 起 步 。 


才 助 


图 7.11 【链接 外 部 样式 表 】 对 话 框 


(5) 单 击 【 浏 览 】 按 钮 ， 选 择 CSS 文件 夹 下 的 Main.css 文件 ， 再 单 击 【 确 定 】 按 钮 ， 
将 该 文件 插入 页 面 中 。 此 时 ， 在 【样式 】 下 拉 列 表 中 ， 将 会 显示 出 该 文件 中 所 定义 的 各 种 
样式 。 

(6) 选择 【插入 】| 【表单 】| 【表单 】 命 令 ， 在 页 面 中 插入 一 个 表单 。 切 换 到 【代码 】 
视图 ， 为 插入 的 表单 添加 “Runat="Server"” 属 性 ， 如 下 : 

<form id="forml" name="forml" method="post" action="" Runat="Server"> 

</form> 

(7) 将 视图 切换 到 【设计 】 视 图 ， 在 表单 内 插入 一 个 表格 Table1， 将 行 数 设置 为 3， 
列 数 设置 为 2， 表 格 宽度 设置 为 750 像素 ， 边 框 粗细 为 0， 如 图 7.12 所 示 。 

(8) 在 表格 内 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【表格 】|【 选 择 表格 】 命 令 , 然后 在 【 属 
性 】 面 板 中 设置 表格 的 对 齐 方式 为 【居中 对 齐 】。 

(9) 选择 第 一 行 中 的 两 个 单元 格 ， 单 击 【 属 性 】 面 板 中 的 国 按 钮 ， 合 并 单元 格 ， 并 设 
置 其 背景 为 白色 ( 扯 FFFFF)， 行 高 为 40， 水 平 对 齐 方式 为 【居中 对 齐 】。 在 单元 格 中 输入 
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文字 “站 点 留言 短 ”， 设 置 其 字体 大 小 为 16 像素 ， 加 粗 ， 字 体 颜 色 值 为 “#9898BA”。 


7.12 【表格 】 对 话 框 


(10) 单 击 表格 第 2 行 的 第 1 个 单元 格 ， 在 【属性 】 面 板 中 的 【样式 】 下 拉 列 表 中 ， 选 
择 样式 td1l( 该 样式 用 于 设置 单元 格 的 Padding Left 属性 为 5 像素 )。 选 择 【 插 入 】| 【图像 】 
命令 , 插入 用 于 发 表 新 留言 的 链接 图 像 ， 图 像 文 件 为 Pic 目录 下 的 Ly.gif， 在 【属性 】 面 板 
中 设置 其 链接 至 Ly_add.aspx。 

(11) 单 击 表格 第 2 行 的 第 2 个 单元 格 ， 在 【属性 】 面 板 中 的 【样式 】 下 拉 列 表 中 ， 选 
择 样式 td2 (该 样式 用 于 设置 单元 格 的 Padding Right 属性 为 5 像素 )。 在 该 单元 格 中 输入 文 
字 “ 管 理 ”， 并 在 【属性 】 面 板 中 设置 其 字体 为 白色 (#FFFFFF)， 并 链接 至 Login.aspx。 单 
击 该 链接 ， 页 面 将 转向 管理 员 的 登录 页 面 。 

(12) 在 表格 的 下 方 再 新 插入 一 个 表格 Table2， 该 表格 主要 用 于 显示 留言 信息 ， 表 格 的 
宽度 设 为 750 像素 ， 行 数 为 2， 列 数 为 2， 边框 粗细 为 0。 同 时 在 表格 的 【属性 】 面 板 中 ， 
设置 表格 的 对 齐 方式 为 【居中 对 齐 】， 表 格 的 背景 颜色 值 为 “ 手 BEBEB”， 填 充 和 间距 均 
为 0。 

(13) 选择 表格 Table2 的 第 1 行 , 将 其 高 度 设置 为 25。 选 择 该 行 的 第 1 个 单元 格 ， 将 其 
样式 设置 为 td1， 背 景 颜色 值 设 置 为 “#cccccc”， 在 其 中 添加 一 个 ASP.NET 中 的 Image 服 
务 器 控件 ， 其 操作 方法 如 下 。 

@ 在 【插入 】 工 具 栏 中 选择 ASPNET， 如 图 7.13 所 示 。 


引 严 85 轩 国 x 国 生生 序 轴 
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图 7.13 【ASP.NET- 插 入 】 工 具 栏 


@ 单 击 【更 多 标签 】 按 钮 国 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASPNET 
标签 】| 【Web 服务 器 控件 】 分 类 ， 在 右边 的 列表 框 中 选择 asp:Image， 如 图 7.14 所 示 。 
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7.14 【标签 选择 器 】 对 话 框 


@ 单 击 【插入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 -Image】 对 话 框 中 设置 ID 为 img_bgq， 
图 像 URL 可 通过 单 击 【浏览 】 按 钮 选择 pic/biaoqing 目录 下 的 任 一 文件 ， 如 图 7.15 所 示 。 


图 7.15 【标签 编辑 器 -Image】 对 话 框 
@ 选择 【布局 】 选 项 ， 将 图 像 对 齐 方式 设置 为 【绝对 中 间 】， 如 图 7.16 所 示 。 


图 7.16 选择 【布局 】 选 项 
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@ 单 击 【 确 定 】 按 钮 ， 返 回 【 标 签 选择 器 】 对 话 框 ， 再 单 击 【 关 闭 】 按 钮 ， 即 可 完 
成 插入 Image 服务 器 控件 操作 。 

这 里 插入 Image 控件 是 为 了 显示 用 户 发 表 留言 时 所 选择 的 表情 ， 目 前 所 选择 的 图 片 只 
是 临时 的 ， 在 绑 定数 据 后 ， 将 会 根据 用 户 发 表 留言 时 选择 的 表情 来 动态 显示 。 在 Image 控 
件 后 ， 输 入 文本 “ 标 题 : ”， 并 加 粗 显 示 。 

(14) 选择 表格 Table2 的 第 1 行 的 第 2 个 单元 格 ， 将 其 样式 设置 为 tt2， 背 景 颜色 值 设 
置 为 “大 ccccc”， 水 平 对 齐 方式 选择 【 右 对 齐 】， 在 其 中 插入 3 个 图 像 ， 其 文件 分 别 为 pic 
目录 下 的 Home.gif、QQ.gif、Email.gif。 其 中 ，Home.gif 表示 留言 人 的 个 人 主页 ，QQ.gif 
表示 留言 人 的 QQ，Email.gif 表示 留言 人 的 电子 邮箱 地 址 ， 其 相应 的 链接 将 在 随后 的 数据 
绑 定 中 动态 绑 定 。 然 后 ， 在 【属性 】 面 板 中 ， 将 3 个 图 像 的 边框 属性 设置 为 0， 这 样 可 保 
证 在 创建 图 像 链接 时 将 不 会 出 现 边 框 。 注 意 ， 这 里 的 静态 图 像 与 前 面 的 Image 服务 器 控件 
是 不 同 的 ， 前 者 是 静态 不 变 的 ， 而 后 者 是 随 着 数据 的 不 同 而 显示 不 同 的 图 像 。 

(15) 选择 表格 Table2 的 第 2 行 中 的 两 个 单元 格 ， 单 击 【属性 】 面 板 中 的 国 按 钮 ， 将 其 
合并 ， 并 在 其 中 新 插入 一 个 表格 Table3， 其 宽度 设 为 750 像素 ， 行 数 为 2， 列 数 为 3， 边 杠 
粗细 为 0， 填充 和 间距 均 设 置 为 0。 

(16) 合并 表格 Table3 的 第 一 列 的 两 个 单元 格 ， 设 置 合 并 后 的 单元 格 的 水 平 对 齐 方式 为 
【居中 对 齐 】， 垂 直 对 齐 方式 为 【居中 】， 宽 度 为 120 像素 。 在 此 单元 格 中 ， 插 入 ASPNET 
中 的 Image 服务 器 控件 ， 控 件 ID 设 为 img face， 图 片 文件 任 取 pic/ touxiang 目录 下 的 一 个 
文件 。 此 处 主要 用 于 显示 用 户 在 发 表 留 言 时 所 选择 的 头像 。 

(17) 合并 表格 Table3 的 第 2 列 的 两 个 单元 格 ， 设 置 合并 后 的 单元 格 的 背景 为 白色 ， 宽 
度 为 1 像素 。 

(18) 选择 表格 Table3 的 第 3 列 的 第 2 个 单元 格 ， 在 【属性 】 面 板 中 设置 其 水 平 对 齐 方 
式 为 【 右 对 齐 】， 设 置 其 样式 为 tt2， 并 在 其 中 输入 “【 留 言 时 间 : 】”。 

至 此 ， 一 个 基本 的 页 面 布 局 已 经 基本 完成 ， 如 图 7.17 所 示 。 
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7.17 页 面 的 基本 布局 
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在 图 7.17 中 ， 用 文字 标记 了 各 个 部 分 所 要 显示 的 信息 ， 而 这 些 信 息 对 应 的 位 置 均 将 插 
入 或 绑 定 动态 数据 ， 以 便 用 户 浏览 时 能 动态 显示 。 注 意 ， 在 Dreamweaver 8 的 设计 视图 中 
所 显示 的 不 一 定 就 是 预览 的 实际 结果 , 因为 CSS 样式 在 设计 视图 中 并 没有 体现 出 来 。 例如， 
前 面 设 置 了 页 面 的 背景 颜色 值 为 “#9898BA”， 而 在 设计 视图 中 仍 显示 为 白色 。 

接 下 来 ， 看 页 面 数 据 的 绑 定 ， 这 也 是 本 例 中 的 重 中 之 重 。 

2. 定义 数据 库 连 接 

在 绑 定数 据 之 前 ， 首 先 需要 创建 一 个 数据 集 。 而 在 创建 数据 集 之 前 ， 必 须 定义 一 个 数 
据 库 连接 ， 两 者 缺 一 不 可 。 

定义 数据 库 连 接 的 具体 操作 如 下 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 选 择 【 数 据 库 】 面 板 ， 如 图 7.18 所 示 。 

(2) 单 击 困 按 钮 ， 系 统 将 弹出 菜单 ， 其 中 包括 【OLE DB 连接 】 和 【SQL 服务 器 】 两 
个 命令 ， 如 图 7.19 所 示 。 如 果 在 Web 应 用 程序 中 使 用 的 是 Microsoft Access 数据 库 ， 则 可 
选择 【OLE DB 连接 】 命 令 ; 而 对 于 SQL Server 数据 库 ， 则 需 选 择 【SQL 服务 器 连接 】 命 
令 。 这 里 选择 前 者 ， 即 OLE DB 连接 。 此 时 ， 系 统 将 弹出 【OLE DB 连接 】 对 话 框 ， 如 
图 7.20 所 示 。 
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图 7.18 【数据 库 】 面 板 图 7.19 创建 连接 命令 


7.20 【OLE DB 连接 】 对 话 框 


(3) 在 连接 名 称 中 输入 “Cnn”, 然后 单 击 【 建 立 ] 按 钮 , 此 时 将 弹出 Data Link Properties 
对 话 框 。 选 择 Provider 选项 卡 ， 如 图 7.21 所 示 。 
在 OLE DB Provider 列表 框 中 , 选择 Microsoft Jet 4.0 OLE DB Provider 选项 , 然后 单 击 
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Next 按钮 ， 此 时 将 切换 至 Connection 选项 卡 ， 如 图 7.22 所 示 。 通 过 单 击 【浏览 】 按 钮 三， 
选择 所 要 连接 的 Microsoft Access 数据 库 文 件 datamdb。 单 击 Test Connection 按钮 ， 测 试 数 
据 库 的 连接 。 如 果 连 接 成 功 ， 系 统 将 弹出 如 图 7.23 所 示 的 对 话 框 。 


Provider |Commaction| havceal aa | Provider Commection | haveneea| Al | 
Select the dalayou want lo connect Io: Specily the alowing io corect to Access dalae 
1. Select or enter a dalabase name 
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2 Enter miomation to log on to the dalabase: 
User Dame 
Eeeemod 


WS Blark password 三 Alow saying password 


确定 取消 帮助 


图 7.21 Provider 选项 卡 图 7.22 ”Conncetion 选项 卡 
(4) 单 击 【确定 】 按 钮 ， 返 回 【OLE DB 连接 】 对 话 框 ， 此 时 在 【连接 字符 串 】 文 本 
框 中 将 显示 前 面 通过 向 导 创 建 的 数据 库 连 接 对 应 的 字符 串 ， 如 图 7.24 所 示 。 


(DD Test connection succeeded, 
[确定 
7.23 ”提示 测试 连接 成 功 的 对 话 框 图 7.24 【OLE DB 连接 】 对 话 框 
(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 库 连接 的 创建 。 Tv 有 8 
至 此 ,我 们 创建 了 一 个 连接 至 本 系统 数据 库 文件 Data.mdb 


的 数据 库 连 接 。 此 时 ， 在 【应 用 程序 】 面 板 组 的 【数据 库 】 


板 中 ， 将 会 显示 所 创建 的 连接 ， 如 图 725 所 示 。 人 
在 所 创建 的 名 为 Cnn 的 数据 库 连 接 下 ， 显 示 了 该 数据 库 ee 

中 的 所 有 数据 表 、 视 图 及 预存 过 程 。 双 击 指定 的 数据 表 ， 可 显 全 

示 该 数据 表 中 定义 的 所 有 字段 信息 , 包括 字段 名 、 数 据 类 型 以 2 


及 字段 大 小 等 。 
3. 创建 数据 集 及 数据 的 简单 绑 定 


创建 数据 库 连接 之 后 , 便 可 进行 数据 集 的 创建 。 所 谓 数据 。 图 725 【数据 库 】 面 板 
集 ， 是 指 通 过 SQL 语句 查询 数据 库 时 返回 的 数据 集合 。 创 建 
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完 数据 集 后 便 可 将 该 数据 集 绑 定 至 页 面 中 ， 在 绑 定 数据 集中 数据 的 地 方 动态 地 显示 数据 。 
在 本 页 面 中 ， 数 据 集 的 创建 步骤 如 下 。 
(1) 打开 【应 用 程序 】 面 板 组 ， 将 切换 至 【服务 器 行为 】 面 板 ， 如 图 7.26 所 示 。 
(2) 单 击 画 按 钮 ， 系 统 将 弹出 一 个 菜单 ， 其 中 包括 【数据 集 】、【 预 存 过 程 】、【 数 
据 网 格 】、【 数 据 列表 】、【 重 复 区 域 】 等 命令 ， 如 图 7.27 所 示 。 
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(3) 选择 【数据 集 】 命 令 ， 系 统 将 弹出 【数据 集 】 对 话 框 ， 如 图 7.28 所 示 。 


图 7.28 【数据 集 】 对 话 框 


(4) 在 【连接 】 下 拉 列 表 中 ， 选 择 前 面 定义 的 数据 库 连接 Cnn， 此 时 在 【表格 】 下 拉 
列表 中 将 会 显示 所 连接 的 数据 库 中 的 所 有 表 ， 选 择 相 应 的 表 ， 在 下 面 的 列表 框 中 将 会 显示 
表 中 的 所 有 字段 。 如 果 需 要 的 数据 集 是 一 个 数据 表 的 所 有 记录 ， 那 么 这 里 只 需 选择 该 表 ， 
单 击 【 确 定 】 按 钮 即 可 。 但 这 里 所 要 获取 的 留言 信息 是 从 Lyinfo( 留 言 信 息 表 )、FaceInfo( 头 
像 信息 表 )、BiaoQing( 表 情 信息 表 )3 个 数据 表 中 关联 取出 的 ， 而 不 是 从 单个 数据 表 中 获取 。 
单 击 【高 级 】 按 钮 ， 将 对 话 框 由 简单 模式 切换 为 高 级 模式 ， 如 图 7.29 所 示 。 

(5) 在 高 级 模式 下 可 输入 SQL 语句 ， 即 可 通过 指定 的 SQL 语句 查询 出 所 要 返回 的 记 
录 集 。 此 处 ， 输 入 以 下 SQL 语句 : 

SELECT a.*, ('~/pic/touxiang/'+b.picaddr) as 


face addr, ('~/pic/biaoqing/ "+c-addr) as bq addr FROM lyinfo a,faceinfo 
b,biaogqing c where faceid=b.id and biaogqingid=c.id order by a.id 


Se 
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的 拓 网 时 好 示 调试 信息 
数据 库 项 : [ 瑟 避 “ 表 入 E22 正当 
2 mue sm | 
Sl 
omen sr 


图 7.29 【数据 集 】 对 话 框 的 高 级 模式 
(6) 该 语句 将 返回 留言 信息 表 的 所 有 字段 信息 ， 以 及 个 人 头像 和 留言 表情 所 对 应 的 图 
片 地 址 。 在 本 系统 中 ， 个 人 头像 对 应 的 图 片 默 认 存 放 在 pic 目录 下 的 TouXiang 文件 夹 中 ， 
留言 表情 对 应 的 图 片 默认 存放 在 pic 目录 下 的 BiaoQing 文件 夹 中 ， 而 在 数据 库 中 仅 存放 图 
片 的 文件 名 。 
(7) 单 击 【测试 】 按 钮 ， 系 统 将 运行 输入 的 SQL 语句 ， 验 证 其 正确 性 。 如 果 正 确 ， 则 
显示 查询 结果 ， 如 图 7.30 所 示 。 


测试 SQt 指 令 


图 7.30 查询 结果 


(8) 单 击 【确定 】 按 钮 返回 【数据 集 】 对 话 框 ， 再 单 击 【确定 】 按 钮 即 可 完成 数据 集 
的 创建 。 此 时 ， 在 【应 用 程序 】 面 板 组 的 【服务 器 行为 】 面 板 中 将 会 显示 刚才 创建 的 数据 
集 DataSetl ， 如 图 7.31 所 示 。 

(9) 接 下 来 ， 可 以 将 数据 集中 的 数据 绑 定 至 已 建 好 框架 结构 的 页 面 中 。 打 开 【 应 用 程 
序 】 面 板 组 ， 切 换 至 【 绑 定 】 面 板 ， 如 图 7.32 所 示 。 

(10) 在 【 绑 定 】 面 板 中 ， 显 示 了 刚才 创建 的 数据 集 ， 同 时 在 数据 集 下 还 包含 该 数据 集 
中 的 所 有 字段 信息 。 直 接 将 数据 集中 相应 的 字段 拖 至 页 面 中 相应 的 位 置 即 可 , 如 图 7.33 所 示 。 
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7.31 【服务 器 行为 】 面 板 图 7.32 【 绑 定 】 面 板 
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图 7.33” 绑 定数 据 后 的 页 面 
4. 动态 数据 的 复杂 绑 定 


此 时 ， 只 是 进行 了 初步 的 数据 绑 定 ， 仍 有 大 量 的 细 化 工作 需要 进行 。 
(1) 设置 个 人 主页 、QQ 及 电子 邮箱 的 相关 链接 。 在 【设计 】 视 图 中 ， 


IT 
[ET 
SE 


a 加 1 个 二 由 用 有 入 洛 中， 下 王 


选 定 “ 主页 » 


图 片 ， 在 【属性 】 面 板 中 设置 其 链接 属性 的 值 为 “<%# DataSetl.FieldValue("Home", 


Container) %> ”; 同 理 ， 分 别 设置 QQ 及 电子 邮箱 图 片 的 


链接 属性 为 


“ http://search.tencent.com/cgi-bin/friend/user_ show_info?ln=<%# DataSetl.FieldValue("qq", 
Container) %>” 和 “mailto:<%# DataSetl. FieldValue("Email", Container) %>”。 其 中 ， 表 达 
式 <%# DataSetl.FieldValue(" 字 段 名 ",Container) %> 用 于 获取 所 绑 定 的 数据 集中 指定 字段 


的 值 。 


(2) 选择 留言 标题 前 的 留言 表情 图 片 ， 将 视图 切换 至 【代码 】 视 图 ， 将 该 Image 服务 
器 控件 的 ImageUrl 属性 的 值 设 置 为 “<%# DataSetl .FieldValue("bq addr", Container) %>”; 


将 视图 切换 回 【设计 】 视 图 , 选择 个 人 头像 图 片 , 再 将 视图 切换 至 【代码 】 视 


图 , 将 该 Image 


全 了 本 了 天 
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服务 器 控件 的 ImageUrl 属性 的 值 设 置 为 “<%# DataSetl.FieldValue("face addr", 
Container) %>”。 

现在 ， 可 以 尝试 预览 该 页 面 。 如 果 页 面 运行 在 ASP.NET 2.0 的 环境 下 ， 那 么 可 能 会 出 
现 编译 错误 ， 如 图 7.34 所 示 。 


Server Error in /lyb' Application. 


图 7.34 编译 错误 


这 个 问题 的 出 现 , 是 由 于 在 ASP.NET 2.0 中 采用 了 ConfigurationManager.AppSettings() 
方法 来 替代 ASPNET 1.0 中 的 ConfigurationSettings.AppSettings() 方 法 读 取 配置 文件 
Web.Config 中 指定 节点 的 值 ， 而 在 Dreamweaver 8 中 生成 的 ASPNET 页 面 采 用 的 仍 是 
ConfigurationSettings.AppSettings() 方 法 。 解 决 办 法 很 简单 ， 将 页 面 切换 至 【代码 】 视 图 ， 
使 用 ConfigurationManager.AppSettings() 替 换 所 有 的 ConfigurationSettings.AppSettings() 
即 可 。 

正常 的 预览 效果 ， 如 图 7.35 所 示 。 


图 7.35 页 面 预览 效果 


5. 高 级 功能 的 添加 
数据 终于 显示 出 来 了 ， 而 且 是 从 数据 库 动 态 取出 的 数据 ， 但 似乎 还 缺少 点 什么 。 不 错 ， 
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还 有 几 个 问题 没有 解决 : 一 是 相关 回复 的 显示 ; 二 是 对 留言 信 
息 的 判断 (包括 该 留言 是 否 为 悄悄 话 以 及 该 留言 是 否 已 被 屏蔽 
等 ); 三 是 这 里 仅 显 示 了 一 条 数据 , 而 用 户 需 要 显示 所 有 的 留言 
信息 。 

下 面 ， 先 来 看 一 看 多 条 数据 的 显示 。 

(1) 选 定 用 于 显示 留言 信息 的 表格 table3。 打 开 【 应 用 程 
序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 画 按钮 ， 系 统 
将 弹出 一 个 菜单 ， 如 图 7.36 所 示 。 
选择 【重复 区 域 】 命 令 ， 此 时 将 弹出 【重复 区 域 】 对 话 框 
中 ， 如 图 7.37 所 示 。 在 【数据 集 】 下 拉 列 表 框 中 选择 前 面 定义 
的 数据 集 DataSetl ， 在 【显示 】 单 选 按钮 组 中 选择 第 一 项 ， 设 ”图 7.36 【服务 器 行为 】 菜 单 
置 一 次 仅 显示 10 条 记录 。 


图 7.37 【重复 区 域 】 对 话 框 


单 击 【确定 】 按 钮 ， 将 视图 切换 至 【代码 】 视 图 ， 可 以 发 现 Dreamweaver 8 在 选 定 的 
表格 标签 外 自动 添加 了 一 个 Repeater 控件 ， 而 整个 表格 代码 均 位 于 <ItemTemplate> 和 
</ItemTemplate> 标 签 之 内 ， 这 就 是 要 重复 显示 的 区 域 。 

(2) 再 在 不 同 的 留言 之 间 添 加 空 行 ， 以 使 页 面 更 加 美观 。 

将 视图 切换 至 【代码 】 视 图 ， 并 将 光标 放置 在 </ItemTemplate> 后 。 单 击 【ASP.NET- 
插入 】 工 具 栏 中 的 髓 按钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 选择 【ASP.NET 标签 】|【 模 
板 】 分 类 ， 并 在 右边 的 列表 框 中 选择 SeparatorTemplate， 如 图 7.38 所 示 。 


图 7.38 【标签 选择 器 】 对 话 框 
单 击 【 插 入 】 按 钮 ， 此 时 在 代码 中 将 插入 <separatortemplate> 和 </separatortemplate> 标 
签 对 ， 在 此 标签 对 之 间 输 入 “<br />”， 即 空 行 ， 如 图 7.39 所 示 。 
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</ItenTemplate> 
《separatortemplate><br /</ separatortenplate) | 
/ASP:Repeater> 


7.39 代码 示例 


保存 页 面 , 再 次 在 浏览 器 中 浏览 该 页 面 , 此 时 可 以 看 到 查询 出 来 的 留言 信息 的 前 10 条 ， 
如 图 7.40 所 示 。 


旬 tk 吉 列 这 个 网 站 ， 仿 间 这 二 同 站 重 好 的 ， 恬 比 较 襄 欢 ， 同 尊 ? 避 后 我 合 案 克 0 


大 名 【入 二: 2006-9-3 5.00.31] 


7.40 页面 预览 


(3) 在 代码 中 添加 对 留言 信息 相关 回复 , 并 对 其 是 否 为 悄悄 话 及 是 否 已 屏蔽 进行 判断 。 
这 里 需要 提醒 读者 ， 虽 然 通过 Dreamweaver 8 快捷 地 创建 ASPNET 页 面 ， 并 实现 了 相关 功 
能 。 但 是 ， 如 果 需 要 实现 一 些 稍微 高 级 的 功能 ， 则 仍 需 对 代码 进行 修改 和 调整 。 因 此 ， 掌 
握 了 Dreamweaver 8 并 不 意味 着 学 会 了 ASPNET， 最 重要 的 仍 在 于 对 ASPNET 基本 语法 
的 掌握 。Dreamweaver 8 只 是 一 种 开发 工具 ， 它 可 以 帮助 设计 界面 ， 调 整 布局 ， 但 关键 之 处 
仍 需 要 在 其 代码 视图 中 编写 ASP.NET 代码 。 
将 视图 切换 至 【代码 】 视 图 ， 在 <HTML> 标 记 前 添加 ASP.NET 脚本 ， 如 下 所 示 : 
【示例 代码 】 
<script Language="VB" runat="server"> 
dim n_ count as Integer=0 
</script> 
这 里 ， 主 要 是 定义 一 个 整 型 变量 n_count， 该 变量 用 于 存储 记录 集 的 当前 行 数 。 然 后 ， 
将 Repeater 控件 的 相关 代码 修改 如 下 。 
【示例 代码 】 
<ASP:Repeater runat="server" DataSource="'<%# DataSetl.DefaultView %$>'> 
<ItemTemplate> 
<table width="750" border="0" align="center" cellspacing="0" 


bgcolor="#EBEBEB"> 
性 站 到 和 


“164 。 


第 7 章 留言 薄 制 作 “165。 


<td height="25" bgcolor="#cccccc" class="tdl"> 
<asp:Image ID="img bq" ImageUrl=<%# datasetl.FieldValue ("bq addr", 
Container) $> ImageAlign=AbsMiddle runat="server" />&nbsp;<strong> 标 题 : 
<%# datasetl.FieldVvalue ("Title", Container) %></strong> 
</td> 
<td height="25" align="right" bgcolor="#cccccc" class="td2"> 
<a href="<%# datasetl.FieldValue ("Home", Container) %>"><img 
src="pic/home.gif" width="44" height="16" border="0" 
/></a>gnbsp; gnbsp; gnbsp; 
<a 
href="http://search.tencent .com/cgi-bin/friend/user show info?ln=<%# 
dataset1.FieldValue ("qq", Container) $>"><img src="pic/qq.gif" width="35" 
height="16" border="0" /></a>&gnbsp; &nbsp; gnbsp; 
<a href="mailto:<%# datasetl .FieldValue ("email", Container) $%>"><img 
src="pic/email.gif" width="42" height="16" border="0" /></a> 
</td> 
</tr> 
<tr> 
<td colspan="2"> 
<table width="100%" border="0" cellpadding="0" cellspacing="0"> 
<tr> 
<td width="120" rowspan="2" align="center" valign="middle"><asp:Image 
ID="img face" ImageUrl=<%# datasetl.FieldValue ("face addr", Container) %> 
runat="server" />&nbsp;</td> 
<td width=1 bgcolor="white" rowspan=2></td> 
<td height="78" valign="top">&nbsp; &nbsp; &nbsp; &nbsp; 
<% 
"获取 当前 留言 信息 的 tag_hide 字段 值 ， 该 字段 表示 当前 留言 是 否 被 管理 员 屏 蔽 
Dim strHide As String =datasetl.defaultView.Table.Rows (n_count) ("tag hide") 
"获取 当前 留言 信息 的 tag_hide 字段 值 ， 该 字段 表示 当前 留言 是 否 为 悄悄 话 
Dim strQQH As String = datasetl.defaultView.Table.Rows (n_count) 
("tag_qqh") 
Dim str HF As String = "" 
' 判 断 当 前 留言 是 否 有 回复 信息 ， 如 果 有 回复 ， 则 将 其 赋值 给 变 最 str_HF 
If Not IsDBNul1l (datasetl1 .defaultView.Table.Rows (n_count) ("reply")) 


Then 

Str HE = dataset1l.defaultView.Table.Rows (n_count) ("reply") 
End If 
IE strHide = "1" Then 

"显示 屏蔽 信息 
$%> 

此 留言 已 被 管理 员 屏蔽 ，^_^ 
<% ElseIf strQQH = "1"” Then ' 显 示 悄 悄 话 信息 $> 

此 留言 为 悄悄 话 ，^ 
< Else "显示 留言 内 容 $> 

<%# dataset1.FieldValue ("Content", Container) %> 
<% 
End If 
If Not IsDBNull (str HF) And str HF <> "" Then 

' 如 果 存 在 回复 信息 ， 则 显示 相关 回复 

%> 


和 
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<br /><br /> 
<div style="padding-left:70px;padding-top:5px;"> 
<table width="450" bgcolor="white" border=0 cellpadding="0" 
cellspacing="0"> 
<tr> 
<td 


style="padding-left:5px7padding-top:5px7padding-right:5px7padding-bottom: 


5PX7 "> 


<b> 相 关 回 复 : </b><br /><%# dataset1.FieldValue ("Reply", Container) $> 


</td> 
/ERS 
</table> 
</div> 
<% 
End If 
%> 
</td> 
</tr> 
<tr> 
<td align="right" class="td2"><%# datasetl.FieldValue ("Name", 


Container) %>【 留 言 时 间 : <%# dataset1.FieldValue ("DDate", Container) s>】</td> 


</tr> 
</table> 
</td> 
</tr> 
</table> 
</ItemTemplate> 
<separatortemplate> 
<br /><% n count=n count+l1 多 > 
</separatortemplate> 
</ASP:Repeater> 


在 以 上 代码 中 添加 的 ASP.NET 代码 段 ， 用 于 控制 留言 信息 及 回复 信息 的 显示 。 
GD 通过 语句 datasetl.defaultView.Table.Rows(n_count)(" 字 段 名 ")( 其 中 ，n_count 


表示 


当前 记录 在 记录 集中 的 行 数 ) 分 别 获取 Tag_qqh( 是 否 悄悄 话 标识 )、Tag_hide( 是 否 屏蔽 标识 )、 
Reply( 回 复 信息 ) 等 字段 的 值 。 当 Tag_hide 的 值 为 1 时， 表示 当前 留言 已 被 管理 员 屏 蔽 ， 此 
时 在 留言 内 容 区域 显 示 文 本 “此 留言 已 被 管理 员 屏 蔽 , ^^; 当 Tag_qqh 的 值 为 1 时 ， 表 
示 当 前 留言 为 悄悄 话 ， 此 时 在 留言 内 容 区 域 显示 文本 “此 留言 为 悄悄 话 ,， 和 ^^”; 当 以 上 两 


种 情况 均 不 存在 时 ， 则 在 留言 内 容 区 域 显示 正常 的 留言 内 容 。 


@ ” 当 存 在 回复 内 容 时 ,在 留言 内 容 的 下 方 添加 了 一 个 <div> 标 签 , 并 在 其 中 添加 了 一 


个 表格 ， 用 于 显示 回复 内 容 。 为 区 别 于 留言 内 容 ， 表 格 的 背景 设置 为 白色 。 
至 此 ， 页 面 的 功能 实现 已 经 全 部 完成 ， 其 浏览 效果 如 图 7.41 所 示 。 
现在 ,再 次 回 过 头 来 看 代码 。 可 以 发 现 ， 页面 中 并 没有 导入 调用 Microsoft Access 


库 所 必须 的 System.Data.OleDb 命名 空间 ,也 有 没 定义 相关 的 数据 库 对 象 。 所 有 的 返回 
集 代码 均 集 成 在 以 下 代码 中 。 
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7.41 页 面 预览 
【示例 代码 】 


<MM:DataSet id="Datasetl" runat="Server" IsStoredProcedure="false" 


Connectionstring="'<%#System.Configuration.ConfigurationManager .AppSettin 
gs ("MM CONNECTION STRING cnn1") %>' 

DatabaseType='<%# 
System.Configuration.ConfigurationManager.APPSettings ("MM CONNECTION_DAT 
ABASETYPE cnnl1") %>"' 

CommandText="'<%# "SELECT a.*, (" + Chr(39) + "~/pic/touxiang/" + Chr(39) + 
"+b.picaddr) as face addr,(" + Chr(39) + "~/pic/biaoqing/" + Chr (39) + 
"+C.addr) as bq addr FROM lyinfo a,faceinfo b,biaoqing c where faceid=b.id 
and biaogqingid=c.id order by a.id" %>' 

Debug="true" PageSize="10" CurrentPage='<%# 

IIf((Request.Querystring ("Datasetl1 CurrentPage") <> 
Nothing),Request .Querystring ("Datasetl CurrentPage"), 0) %>' > 
</MM:Dataset> 


同时 ， 在 页 首 引 用 了 Macromedia 公司 开发 的 用 户 控 件 DreamweaverCtrls， 如 下 : 


<%@ Register TagPrefix="MM" Namespace="DreamweaverCtrls" 

Assembly="DreamweaverCtrls,version=1.0.0.0,publicKeyToken=836f606ede05d4 

6a,culture=neutral" $> 

也 就 是 说 ， 在 使 用 Dreamweaver 8 开发 ASP.NET 应 用 程序 时 ， 在 ASP.NET 页 面 看 到 
的 只 是 用 户 控件 DreamweaverCtrls 的 一 些 属性 描述 代码 ， 而 不 是 VB.NET 代码 ， 这 些 代码 
均 已 被 编译 在 DreamweaverCtrls.dll 文件 中 了 。 

对 于 初学 者 来 说 ， 这 是 一 种 快捷 的 途径 ， 可 以 迅速 开发 出 ASP.NET 应 用 程序 ， 而 无 须 
过 多 了 解 代码 实现 的 原理 。 


se 


“168 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


7.2.2 添加 留言 页 面 


通过 添加 留言 页 面 ， 用 户 可 发 表 新 的 留言 信息 。 下 面 , 来 看 一 看 添加 留言 页 面 的 实现 。 
在 浏览 留言 页 面 的 功能 实现 中 ， 详 细 介 绍 了 页 面 框架 结构 和 系统 功能 的 具体 实现 。 在 
本 页 面 及 以 后 的 功能 介绍 中 ， 将 忽略 页 面 布局 的 具体 操作 ， 重 点 介绍 页 面 功能 的 实现 。 


1. 添加 控件 
(1) 设计 页 面 ， 如 图 7.42 所 示 。 


| 
| 
| 
| 
| 
| 
， 
| 


图 7.42 ”页面 布局 
在 页 面 中 ， 添 加 了 一 个 窗 体 ， 并 在 窗 体 中 添加 了 一 个 表格 ， 同 时 设置 了 相应 的 文本 信 
息 。 在 图 中 ,用 文字 标记 了 各 信息 输入 单元 格 中 所 需 放置 的 ASP.NET 服务 器 控件 。 下 面向 
其 中 添加 控件 。 
在 【ASP.NET- 插 入 】 工 具 栏 中 , 提供 了 常用 的 ASPNET 服务 器 控件 ,如 图 7.43 所 示 。 


文本 标签 ”下拉 列表 单 选 按钮 文本 输入 框 


命令 按钮 复 选 框 复 选 框 列表 下 拉 框 ”图 像 按钮 单 选 按钮 列表 
图 7.43 【ASP.NET- 插 入 】 工 具 栏 


(2) 将 【ASPNET- 插 入 】 工 具 栏 中 的 相应 控件 按钮 拖 至 页 面相 应 的 位 置 ， 即 可 添加 
该 控件 。 拖 动 【 文 本 框 】 按 钮 至 文字 “发 言 标题 ”后 的 单元 格 中 ， 此 时 将 弹出 【asp: 文 本 
框 】 对 话 框 ， 如 图 7.44 所 示 。 

在 该 对 话 框 中 设置 ID 为 title，【 文 本 模式 】 为 【单行 】， 单 击 【和 确定】 按钮 即 可 。 与 
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此 类 似 ， 添 加 留言 人 、 邮 箱 地 址 、 联 系 QQ、 个 人 主页 及 留言 内 容 等 对 应 的 文本 框 控件 ， 
对 应 的 控件 ID 分 别 为 Lyr、E-mail、QQCode、HomePage、Content。 其 中 ， 留 言 内 容 对 应 
的 文本 框 控件 的 模式 为 多 行 ， 列 数 设 为 54， 行 数 设 为 5， 如 图 7.45 所 示 。 


7.44 【asp: 文 本 框 】 对 话 框 7.45 ”留言 内 容 对 应 的 文本 框 控件 的 设置 


(3) 拖 动 复 选 框 控件 至 文字 “悄悄 话 ” 后 面 的 单元 格 中 ， 此 时 将 弹出 【asp: 复 选 框 】 对 
话 框 ， 设 置 ID 为 QQH，【 文 本 】 为 “此 留言 为 悄悄 话 ”，【 文 本 对 齐 】 为 【 右 对 齐 】， 
如 图 7.46 所 示 。 单 击 【 确 定 】 按 钮 ， 即 可 添加 该 复 选 框 控件 。 

(4) 拖 动 单 选 按钮 控件 至 文字 “性 别 ” 后 面 的 单元 格 中 ， 此 时 将 弹出 【asp: 单 选 按钮 】 
对 话 框 ， 设 置 其 ID 为 Radiol， 文本 为 “帅哥 ”，【 文 本 对 齐 】 为 【 右 对 齐 】， 如 图 7.47 
所 示 。 


图 7.46 【asp: 复 选 框 】 对 话 框 图 7.47 【asp: 单 选 按钮 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 即 可 添加 该 单 选 按钮 控件 。 选 择 该 控件 ， 在 【属性 】 面 板 中 设置 
其 选中 状态 为 “已 选中 ”, 【组 名 称 】 为 Group1。 与 此 类 似 ， 再 次 添加 一 个 单 选 按钮 控件 ， 
其 ID 为 Radio2，【 文 本 】 为 “靓女 ”， 选 中 状态 为 “未 选中 ”，【 组 名 称 】 为 Group2。 


提示 : 通过 将 多 个 单 选 按钮 的 组 名 称 设 为 相同 ， 可 实现 惟一 选择 。 即 选中 其 中 一 个 单 选 按 
钮 ， 其 他 单 选 按钮 的 状态 将 自动 切换 为 “未 选中 ”。 


(5) 将 光标 置 于 文字 “选择 头像 ”后 的 单元 格 中 ， 单 击 遇 按钮 ， 在 弹出 的 【标签 选择 
器 】 对 话 框 中 选择 【ASPNET 标签 】 分 类 ， 在 右边 的 列表 框 中 选择 asp:Image， 插 入 一 个 
Image 控件 ， 设 置 其 ID 为 DispImg， 高 度 为 100 像素 ， 宽 度 为 50 像素 ， 替 换文 本 为 “头像 
预览 ”， 其 图 像 URL 暂 不 设置 ， 在 程序 中 由 代码 绑 定 。 

(6) 在 如 图 7.42 所 示 的 页 面 框架 中 ，“ 选 择 头 像 ” 下 面 的 单元 格 中 需 添 加 一 个 下 拉 列 
表 杠 控件。 该 控件 用 于 显示 从 数据 库 中 获取 的 所 有 头像 名 称 以 供用 户 选 择 ， 选 择 不 同 的 头 
像 名 称 ， 右 侧 的 Image 控件 将 显示 相应 的 预览 图 像 。 为 此 ， 需 创建 一 个 数据 集 ， 并 将 其 中 
的 数据 绑 定 到 该 下 拉 列 表 框 控件 ， 以 便 实 现 头 像 名 称 的 动态 显示 。 

打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 在 弹出 的 菜单 
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中 选择 【数据 集 】 命 令 ， 将 弹出 【数据 集 】 对 话 框 ， 如 图 7.48 所 示 。 


中 le | 


图 7.48 【数据 集 】 对 话 框 
在 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSetl ， 选 择 前 面 所 定义 的 连接 Cnn， 在 【表格 】 
下 拉 列 表 框 中 选择 FaceInfo， 排 序 方式 设 为 按 ID 升序 排序 。 单 击 【确定 】 按 钮 ， 完 成 数据 
集 的 创建 。 
(7) 拖 动 下 拉 列表 框 控件 至 文字 “选择 头像 ”下 的 单元 格 中 ， 此 时 将 弹出 【asp: 下 拉 列 
表 】 对 话 框 ， 如 图 7.49 所 示 。 


图 7.49 设置 下 拉 列 表 SelFace 


将 ID 设置 为 “SelFace”， 【数据 集 】 选 项 设 为 DataSet1，【 获 取 标签 自 】 选 项 ( 即 显 
示 名 称 ) 设 为 数据 集中 的 字段 Name, 【获取 值 自 】( 即 返回 值 ) 选 项 设 为 数据 集中 的 字段 ID， 
单 击 【确定 】 按 钮 。 

(8) 此 外 ， 考 虑 到 当下 拉 列 表 框 控件 SelFace 的 值 发 生 改变 时 ， 除 了 需要 获取 其 对 应 
的 ID 值 (该 值 保 存 至 数据 库 中 )， 还 需 获取 该 选项 对 应 的 图 像 地 址 ， 即 字段 PicAddr。 如 果 
在 获取 ID 后 再 从 数据 库 中 读 取 其 对 应 的 字段 PicAddr 的 值 , 那么 在 操作 中 将 会 出 现 多 次 与 
数据 库 交 互 ， 就 降低 了 程序 的 效率 。 为 此 ， 在 下 拉 列 表 框 控件 SelFace 后 再 添加 一 个 隐藏 
的 下 拉 列 表 框 控件 ， 其 ID 为 SelFacel， 【数据 集 】 仍 选择 DataSetl，【 获 取 标 签 】 为 字段 
Name， 【获取 值 自 】 为 字段 PicAddr， 如 图 7.50 所 示 。 

选择 该 控件 并 右 击 ， 从 弹出 的 子 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 
器 -DropDownList】 对 话 框 中 选择 【样式 信息 】 分 类 ， 取 消 对 【可 见 】 复 选 框 的 选择 ， 如 
图 7.51 所 示 。 

单 击 【确定 】 按 钮 ， 即 可 将 下 拉 列 表 框 控件 SelFacel 设置 为 隐藏 。 
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图 7.51 【标签 编辑 器 -DropDownList】 对 话 框 


(9) 对 于 文字 “选择 表情 ”对 应 的 图 像 单 选 按钮 ， 通 过 DataList 控件 来 实现 。 为 此 ， 
需要 再 创建 一 个 数据 集 ， 将 该 数据 集 命名 为 DataSet2， 如 图 7.52 所 示 。 


图 7.52 创建 数据 集 DataSet2 


由 于 这 里 需要 取得 表情 对 应 的 图 片 地 址 ， 因 此 把 【数据 集 】 对 话 框 切换 到 高 级 模式 ， 
输入 SQL 语句 ， 如 下 : 


select *,('~/pic/biaoqing/'+addr) as pic addr from biaoqing order by id 


(10) 定义 数据 集 之 后 ， 打 开 【 应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 
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按钮 天 ， 在 弹出 的 菜单 中 选择 【数据 列表 】 命 令 ， 此 时 将 弹出 【数据 列表 】 对 话 框 ， 如 


图 7.53 所 示 。 


在 对 话 框 中 , 将 ID 设置 为 DataListl ， 
示 】 选 项 中 选择 【所 有 记录 】 单 选 按钮 ，【 组 织 项 】 选 项 中 选择 【使 


数 磊 列表 


ID: otist 
数据 焦 : nstsset2 | 


中 


图 7.53 【数据 列表 】 对 话 杠 


x 


在 【数据 集 】 下 拉 列 表 框 中 选择 DataSet2，【 显 


表 】 单 选 按钮 ， 同 


时 将 【 表 列 】 设 置 为 9， 选择 【 自 上 而 下 换行 】 单 选 按钮 。 在 【模板 】 列 表 框 中 ， 选 择 【 项 
目 】 选 项 ， 并 在 【内 容 】 文 本 框 中 输入 : 


<asp:CheckBox id="bq" ToolTip=<%# DataSet2.FieldValue ("ID"，Container) $%> 
Checked="false" 
OnCheckedChanged="Check Changed" 
AutoPostBack=true 

runat="server" /> 


<as 


p:Image ID="Image2" 


BorderWidth=0 
ImageUrl=<%# DataSet2.FieldValue ("pic addr", Container) 
runat="server" /> 


这 是 


%> 


有 添加 了 一 个 复 选 框 控件 和 一 个 Image 控件 ， 作 为 重复 显示 的 内 容 。 其 中 ， 复 选 框 


控件 的 ToolTip 属性 设置 为 数据 集 DataSet2 中 的 字段 ID 的 值 ，AutoPostBack 属性 为 True， 
OnCheckChanged 事件 为 Check_Changed， 这样 当 列 表 中 其 中 一 个 复 选 框 被 选中 时 ,将 会 自 
动 触发 自 定义 的 Check_Changed 事件 。 而 在 所 定义 的 Image 控件 中 , 将 其 ImageUrl 属性 设 
置 为 数据 集 DataSet2 中 的 字段 Pic_addr 的 值 。 

至 此 ， 界 面 设计 基本 完成 ， 设 计 视 图 如 图 7.54 所 示 。 


2. 添加 事件 代码 
下 面 ， 来 添加 相关 的 事件 代码 。 


(D) 
工具 栏 


a 


将 视图 切换 至 【代码 】 视图, 将 光标 置 于 <HTML> 标 记 前 ， 单 和 


fF【ASP.NET- 插 入 】 


的 量 按 钮 ， 系 统 将 在 光标 所 在 处 插入 一 段 ASPNET 代码 ， 如 下 所 示 : 
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<script runat="server"> 

Sub Page Load(Src Rs Object, E As EventArgs) 
If Not IsPostBack Then 

DataBind() 

End If 

End sub 

</acript> 


add.aspx] 


加 
Ey 
FI 
me 


Pickdir 
昌国 数据 集 Datise2) 


[mm 可 
El 用 


日 类 :2006-05-1001:00 大 小 日记 
7.54 ”页 面 框架 


这 段 代码 定义 了 Page_Load 事件 (该 事件 在 页 面 加 载 时 执行 )， 并 在 其 中 调用 了 一 个 默 
认 的 过 程 DataBind()。 该 过 程 通常 用 于 绑 定 数据 ， 这 里 可 以 将 其 删除 。 由 于 需要 设置 显示 
头像 对 应 的 Image 控件 的 初始 值 ， 因 此 可 在 Page_ Load 事件 中 添加 语句 : 
dispimg.ImageUrl="~/pic/touxiang/" & datasetl.defaultView.Table.Rows (0) 
("picaddr") 
在 此 语句 中 , 通过 获取 数据 集 DataSetl 第 一 条 记录 中 的 PicAddr 字段 的 值 ( 即 头像 对 应 
的 图 片 名 称 )， 并 加 上 图 片 地址 前 级 ， 然 后 赋值 给 Image 控件 的 ImageUrl 属性 。 这 样 ， 可 
避免 当 页 面 初 次 加 载 且 用 户 尚未 选择 头像 时 Image 控件 无 法 正常 显示 。 
(2) 在 Page _ Load 事件 代码 后 ， 添 加 名 为 Check_Changed 的 事件 代码 ， 如 下 : 
【示例 代码 】 
Sub Check Changed (ByVal Sender As Object, ByVal E Rs EventArgs) 
"定义 两 个 checkBox 控件 类 型 变量 
Dim ObjCHK As CheckBox 


Dim ObjCHK1 Rs CheckBox 

Dim i As Integer 

"获取 触发 当前 事件 的 checkBox 控件 ， 并 赋 给 objcHK 变量 
ObjCHK = CType (Sender, CheckBox) 

If ObjCHK.Checked Then 
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' 当 objcHK 变量 所 表示 的 CheckBox 控件 为 选中 状态 时 ， 取 消 数据 列表 内 其 他 CheckBox 
控件 的 选中 状态 
For i = 0 To DataListl.Items.Count - 1 
ObjCHK1 = DataListl.Items (i) .FindControl ("bq") 
IE ObjCHK1.ToolTip <> ObjCHK.ToolTip And ObjCHK]1.Checked Then 
ObjCHK1 .Checked = False 
End If 
Next 
End If 
End Sub 


该 事件 代码 在 数据 列表 中 的 CheckBox 控件 的 选中 状态 发 生 改 变 时 触发 。 在 代码 中 ， 
首先 获取 数据 列表 中 触发 当前 事件 的 源 ， 即 CheckBox 控件 ， 如 果 该 控件 的 状态 为 选中 状 
态 ， 则 将 数据 列表 中 的 其 余 CheckBox 控件 置 为 未 选中 状态 。 

(3) 添加 当下 拉 列 表 框 SelFace( 选 择 头 像 ) 的 选项 发 生 改 变 时 所 触发 的 事件 。 首 先 ， 选 
择 下 拉 列 表 框 控 件 SelFace 并 右 击 ， 从 弹出 的 子 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 
【标签 编辑 器 -DropDownList】 对 话 框 中 的 【常规 】 分 类 中 选中 【自动 回 发 】 复 选 框 。 然 后 ， 
选择 【事件 】|【OnSelectedIndexChanged】 分 类 ， 在 右边 的 文本 框 中 输入 Index_Changed( 这 
是 触发 事件 的 名 称 )， 如 图 7.55 所 示 。 


标签 篇 辑 器 - DropDownList 


DropDownList ~ OnSelectedIndexChanged 
ndex_Changed 


图 7.55 【标签 编辑 器 -DropDownList】 对 话 框 


(4) 单 击 【 确 定 】 按 钮 ， 将 视图 切换 至 【代码 】 视 图 ， 添加 Index_Changed 事件 ， 代 
码 如 下 : 
【示例 代码 】 
Sub Index Changed (ByVal Sender As Object, ByVal E As EventArgs 
Dim thestr As String 
' 获 取 头 像 所 对 应 的 文件 名 
thestr = selfacel.Items (selface.SelectedIndex) .value 
dispimg.ImageUTr1 = "~/pic/touzxiang/" & thestr 
End sub 
在 选择 头像 时 ， 使 用 了 两 个 下 拉 列 表 框 控件 ， 其 中 一 个 为 可 见 状 态 ， 供 用 户 选择 ，ID 
为 selface; 另 一 个 则 为 隐藏 状态 ，ID 为 Selfacel 。 两 个 控件 绑 定 的 数据 是 完全 一 样 的 。 这 
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里 ， 通 过 Selface.SelectedIndex 属性 来 获取 用 户 所 选择 的 头像 在 下 拉 列 表 框 控件 中 的 序号 ， 
再 通过 Selfacel.Items(selface.SelectedIndex).value 属性 来 获取 隐藏 下 拉 列 表 框 控件 对 应 该 序 
号 的 值 ， 即 相应 图 片 的 文件 名 。 

(5) 有 一 个 关键 处 需要 注意 。 即 使 用 了 下 拉 列 表 框 控件 Selface 的 回 发 事件 ， 其 数据 是 
通过 数据 集 动态 绑 定 的 。 而 在 Dreamweaver 8 所 提供 的 用 户 控 件 DreamweaverCtrls 中 ， 其 
页 面 绑 定 的 回 发 属性 PostBackBind 的 值 默认 为 True， 即 当 页 面 回 发 时 数据 将 会 重新 绑 定 。 
这 样 将 导致 下 拉 列 表 框 控件 Selface 的 值 始 终 是 第 一 项 。 因 此 必须 在 代码 中 ， 将 属性 
PostBackBind 的 值 改 为 False 如 图 7.56 所 示 。 


MM: DataSet> 
MM: PageBind runat=" server" (FostBackBind=" "False 


7.56 修改 PostBackBind 属性 


至 此 ， 页 面 中 事件 代码 的 添加 工作 大 部 分 已 经 完成 ， 只 剩 下 最 后 一 项 ， 那 就 是 【提交 】 
按钮 的 事件 代码 的 添加 。 虽 然 ， 在 Dreamweaver 8 中 提供 了 插入 记录 的 快捷 途径 ， 但 那 仅 
限于 所 插入 的 记录 项 的 值 均 可 从 页 面 中 的 表单 元 素 中 获取 。 而 在 本 页 面 中 ， 对 于 用 户 所 选 
择 的 留言 表情 ， 无 法 直接 通过 表单 元 素 获 取 ， 因 此 只 能 通过 传统 的 代码 来 实现 。 

(6) 为 了 与 数据 库 连接 ， 必 须 先导 入 相应 的 命名 空间 : System.Data 和 
System.Data.OleDb， 如 图 7.57 所 示 。 


<MM: PageBind runat= server” PostBackBind="False” /> 
W@ Import Namespace=" System.Data” %> 1 
%@ Import Namespace=" System.Data.O0leDb” %» 导入 命名 空间 
《script runat=" server”> 


图 7.57 导入 命名 空间 
(7) 选择 提交 按钮 控件 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 
的 【标签 编辑 器 -Buttou】 对 话 框 中 选择 【事件 】|OnClick 分 类 ， 在 右边 的 文本 框 中 输入 
“sure_clickk”( 即 单 击 【 提 交 】 按 钮 时 所 触发 的 事件 名 称 )， 如 图 7.58 所 示 。 


7.58 ”定义 提交 按钮 的 OnClick 事件 


(8) 单 击 【 确 定 】 按 钮 ,将 视图 切换 至 【代码 】 视 图 ， 添加 sure_click 事件 ,代码 如 下 : 


SL 
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【示例 代码 】 
Sub sure_click(Sender As Object,E As Eventargs) 
"定义 数据 库 连 接 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim Sql As String 
Dim theTitle Rs String = title.Text “' 获 取 留 言 标题 信息 
Dim theLyr As String = lyr.Text “' 获 取 留 言 人 信息 
Dim theEmail Rs String = email.Text “' 获 取 邮 箱 地 址 信息 
Dim theQQ Rs String = QQocode .Text “' 获 取 oo 号 码 信息 
Dim theHomePage As String = homepage.Text “获取 个 人 主页 信息 
Dim theContent As String = Content.Text “，' 获 取 留 言 内 容 信息 
Dim theSex Rs String 
Dim theQQH Rs String 
Dim theFace Rs String = selface.SelectedItem.Value ' 获 取 用户 所 选择 的 头像 
Dim theBQ Rs String = "0" 
"判断 性 别 
If Radiol.Checked Then 
theSex = " 男 " 


Else 
theSex = " 女 " 

End If 

' 判 断 是 否 为 悄悄 话 

If qqh.Checked Then 
theQQH = "1" 

Else 
theQQH = "0" 

End If 


"由 于 模板 (ItemTemplate) 的 重复 循环 ， 在 数据 列表 中 的 checkBox 控件 具有 同一 ID ( 即 bq) 
"可 以 通过 在 DataList 控件 的 Items 集合 中 遍历 并 检索 指定 索引 的 DataListItem， 然 后 调用 
相应 的 Findcontrol 方法 来 查找 ID 名 为 bq 的 checkBox 控件 ， 并 判断 当前 是 否 处 于 选中 状态 
Dim ObjCHK As CheckBox 
Dim i As Integer 
For i = 0 To DataListl.Items.Count - 1 
"查找 ID 为 bq 的 checkBox 控件 
ObjCHK = DataList1l.Items (i) .FindControl ("bq") 
"判断 当前 checkBox 控件 是 否 处 于 选中 状态 
If ObjCHK.Checked Then 
"获取 选中 的 checkBox 控件 的 roolTip 属性 ， 即 该 表情 在 数据 库 中 的 编号 
theBQ = ObjCHK.ToolTip 
' 由 于 同一 时 间 只 可 能 有 一 个 checkBox 控件 处 于 选中 状态 ， 因 此 当 检 索 到 一 个 CheckBox 
被 选中 ， 即 可 退出 循环 
Exit For 
End If 
Next 
' 连 接 数 据 库 
strcnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING Cnn") 
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Cnn = New OleDbCconnection (StrCnn) 

Cnn.open () 

"执行 插入 语句 

Sql = "insert into 
lyinfo (name, sex, qq, email,homepage, title, content, faceid,biaogqingid, tag qq 
h) values('" & Trim(theLyr) & "','" & Trim(theSex) & "','" & Trim(theQQ) & 
"i" & Trim(theEmail) & "','" & Trim(theHomePage) & "','" & Trim(theTitle) 
&"','" & Trim(theContent) & "'," & Trim(theFace) & "," & Trim(theBQ) & ",'" 
& Trim(theQQH) & "')" 

Cmd = New OleDbCommand (Sql, Cnn) 

Cmd .ExecuteNonQuery () 

Cnn.Close() 

"数据 保存 成 功 后 ， 跳 转 至 留言 查询 页 面 

Response.Redirect ("default .aspx") 
End Sub 


至 此 ， 本 页 面 的 制作 全 部 完成 ， 预 览 后 的 界面 如 图 7.59 所 示 。 


人 悄悄 话 : 。 厂 此 留言 为 全 情话 


; 5 六 Fr Sr Or Or Or Dr Dr Or 
F 和 -四 Fr 动 r 四 Fr 加 Fr 外 Fr 包 Fr 合 r 久 


图 7.59 页 面 预览 


7.3 留言 筹 的 后 台 页 面 制作 


留言 秒 的 后 台 功 能 包括 对 留言 的 管理 及 留言 回复 。 其 中 ， 留 言 管理 功能 又 包括 屏蔽 留 
留言 。 


留言 管理 页 面 与 留言 浏览 页 面 类 似 ， 不 同 之 处 在 于 ， 在 留言 管理 页 面 中 无 须 对 留言 信 
息 进 行 悄悄 话 和 是 否 屏蔽 的 判断 ， 同 时 添加 对 留言 管理 的 操作 按钮 或 链接 ， 如 回复 、 删 除 
和 屏蔽 等 。 


ie 
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1. 调整 页 面 结构 


(1) 将 留言 浏览 页 面 复制 并 重 命名 为 Admin.aspx。 在 Dreamweaver 8 中 打开 文件 
Admin.aspx， 将 视图 切换 至 【代码 】 视 图 ， 把 用 于 判断 留言 是 否 为 悄悄 话 及 是 否 屏蔽 的 代 
码 段 删除 ， 如 图 7.60 所 示 。 


| Din strQQH As String = dataset!, defaultyiew Table.Rows(n. count) (” tag_qqh” 


Vin str. HF hs tring = 


I No tI DDN (da stasetl. defaultView, Table. Ro eT cots eply”)) Then 
应 = dataset1. defaultView. Table.Rows (n_count) ("r 


( 了 i "I Then 他 除 ) 


ESENIIRNE. a 

% ElseIf strQQH = “1” Then %> 
此 留言 为 悄悄 话 ， 

% Else 


《Mt dataset1. Raat Content", Container) %> 


End If 
If Not IsDBNull (str_HF) And str_HF <> “” Then 


%> 
hr /Cbr /> 
7.60 删除 代码 段 


(2) 添加 相应 的 管理 操作 图 片 ， 作 为 按钮 。 其 中 ， 回 复 操作 仅 是 一 个 链接 ， 即 链接 至 
相应 的 回复 页 面 (该 页 面 将 在 下 一 小 节 中 叙述 )， 因 此 只 需 创 建 一 个 Image 控件 并 设置 相应 
链接 即 可 ， 而 删除 和 屏蔽 操作 均 通过 图 片 按钮 控件 ( 即 ImageButton 控件 ) 来 实现 。 

在 个 人 头像 下 添加 文本 “管理 : ”， 并 将 其 字体 设 为 粗 体 。 在 该 文本 后 插入 pic 目录 
下 的 Reply.gif( 回 复 图 片 )， 在 【属性 】 面 板 中 设置 其 边框 属性 为 0， 链 接 属 性 为 
“LY_Reply.aspx?id=<%# DataSetl.FieldValue("ID", Container) %>”, 这 里 将 数据 集 DataSetl 
中 的 字段 ID 的 值 作为 参数 进行 传递 。 选择 图 片 并 右 击 , 在 弹出 快捷 菜单 中 选择 【编辑 标签 】 
命令 。 在 接着 弹出 的 【标签 编辑 器 】 对 话 框 中 将 【常规 】 分 类 中 的 对 齐 属性 设置 为 【绝对 
居中 】。 

(3) 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 【 图 像 】 按 钮 图 至 回复 图 片 之 后 ， 此 时 将 
弹出 【asp: 图 像 按钮 】 对 话 框 ， 如 图 7.61 所 示 。 


mm — we | 
Tm | 
于 抱 人 0 


7.61 添加 图 像 按钮 Del 


(4) 在 对 话 框 中 ， 设 置 ID 为 Del，【 图 像 URL】 选 项 为 “pic/delgif”，【 工 具 提 示 】 
选项 为 “删除 留言 ”，【 命 令 名 称 】 选 项 为 DelClick，【 命 令 参 数 】 选 项 为 “<%# 
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DataSetl.FieldValue("ID", Container) %>”。 单 击 【 确 定 】 按 钮 ， 完 成 插入 操作 ， 这 里 添加 

的 是 用 于 执行 删除 操作 的 命令 按钮 。 选 择 该 图 像 按钮 ， 单 击 【 属 性 】 面 板 中 的 -全 按钮 ， 可 

弹出 图 像 按钮 的 【标签 编辑 器 】 对 话 框 ， 如 图 7.62 所 示 。 
EEC 


和 规 JaagsBatton - 布局 
于 生生 Cm 
日 事件 EF 
Docormant | 
Ouclick -5 一 
DnDataBiadi 过 扫 克 度 : 
Oispesd LI 
es iiEe [一 
npraRent i = 
OnliLond 
?标签 入 息 
ww | 


图 7.62 【标签 编辑 器 -ImageButton】 对 话 框 


(5) 选择 【布局 】 分 类 ， 设 置 【图 像 对 齐 方式 】 选 项 为 【绝对 中 间 】， 边 框 宽度 为 0。 
单 击 【确定 】 按 钮 ， 完 成 设置 。 

(6) 与 以 上 操作 类 似 , 在 图 像 按 钮 Del 后 添加 一 个 新 的 用 于 执行 屏蔽 操作 的 图 像 按 钮 ， 
其 属性 设置 如 图 7.63 所 示 。 


mm — we | 
EEC ER 
LS | 


FRR 一 Dd 
ET 


图 7.63 ”添加 图 像 按钮 Hide 
至 此 ， 页 面 结构 调整 完毕 。 接 下 来 ， 是 编写 相应 操作 的 事件 代码 。 
2. 编写 相应 事件 代码 


(1) 选择 Repeater 数据 控件 并 右 击 ， 在 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 ， 此 
时 将 弹出 针对 Repeater 控件 的 标签 编辑 器 ， 如 图 7.64 所 示 。 


标签 篇 加 器 - Repeater 


了 | Repeater - OrTtenComnand 


epeater_IteaCommand 


7.64 【标签 编辑 器 -Repeater】 对 话 框 


le 
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(2) 在 【事件 】 分 类 中 选择 OnItemCommand， 在 右 侧 的 文本 框 中 输入 定义 的 事件 名 称 
Repeater ItemCommand 。 单 击 【 确 定 】 按 钮 ， 将 视图 切换 至 【人 代码】 视图， 添加 
Repeater ItemCommand 事件 ， 代 码 如 下 : 

【示例 代码 】 


Sub Repeater ItemCommand (BYVal source As Object, ByVal e Rs 
RepeaterCommandEventArgs) 


' 定 义 数 据 库 连 接 

Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim StrConn As String 

Dim Sql As String 

Dim theID As String 

"获取 数据 库 连 接 字符 串 

StrConn = 
System.Configuration.ConfigurationSettings.ApPPSettings ("MM CONNECTION ST 
RING Cnn") 

"通过 e.CommandName 获取 当前 触发 事件 的 命令 名 ， 以 此 判断 是 屏蔽 操作 还 是 删除 操作 

If e.CommandName = "HideClick" Then 


"命令 名 为 Hideclick， 当 前 操作 为 屏蔽 留言 操作 
theID = e.CommandArgument “获取 命 令 参数 ， 该 参数 表示 当前 所 要 操作 的 留言 ID 
"连接 数据 库 
Cnn = New OleDbCconnection (strConn) 
Cnn.open () 
"将 当前 留言 的 tag_hide 字段 值 设 为 1， 即 置 为 屏蔽 状态 
Sql = "update lyinfo set tag_hide='1' where id=" & Trim(theID) 
Cmd = New OleDbCcommand (Sql1， Cnn) 
"执行 SQL 语句 
Cmd.ExecuteNonQuery () 
Cnn.Close() 

ElseIf e.CommandName = "DelClick" Then 
"命令 名 为 Delclick， 当 前 操作 为 删除 留言 操作 
theID = e.CommandArgument “获取 命令 参数 ， 该 参数 表示 当前 所 要 操作 的 留言 ID 
Cnn = New OleDbCconnection (strConn) 
cnn.Open () 
"执行 删除 语句 
Sql = "delete from lyinfo where id=" & Trim(theID) 
Cmd = New OleDbCommand (sql, Cnn) 
Cmd .ExecuteNonQuery () 
Cnn.close() 
' 将 页 面 重 定向 本 页 面 ， 刷 新 数据 显示 
Response.Redirect ("admin.aspx") 

End If 

End Sub 


这 里 ， 


采用 了 DataList 控件 的 ItemCommand 事件 ， 而 没有 定义 图 像 按 钮 的 单 击 事件 。 


这 是 由 于 ItemCommand 事件 是 DataList 控件 自 带 的 默认 事件 , 任何 DataList 控件 中 的 命令 
按钮 被 单 击 后 ， 首 先 触发 的 是 femCommand 事件 ， 然 后 才 是 用 户 定 义 的 相应 的 按钮 事件 。 
(3) 如 果 当 前 系统 是 运行 在 ASP.NET 2.0 的 环境 下 ， 将 可 能 出 现 运行 时 异常 错误 : 
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Invalid postback or callback argument( 无 效 的 回 发 或 回调 参数 )。 在 此 情况 下 ， 需 要 在 页 首 添 
加 “EnableEventValidation="false"”， 如 图 7.65 所 示 。 


<¥%@ Page Langeuage=" YB” ResponseEncodine=" gb2312” eEventValidation=" false | 
WN@ Register TagPrefix="WI" Namespace=" Dreamweave: a a 
“DreamweaverCtrls, version=1. 0.0.0,publicKeyToken=836f606ede05d46a, culture=neutral” 和 | 


图 7.65 修改 代码 


事实 上 , 在 ASPNET 1.0 中 并 没有 EnableEventValidation 属性 , 该 属性 是 ASPNET 2.0 
中 新 增 的 ， 用 于 指示 是 否 执行 事件 验证 ， 默 认 值 为 True。 事 件 验证 机 制 在 一 定 程度 上 可 消 
除 未 经 授权 的 回 发 请 求 和 回调 所 带 来 的 风险 , 它 指 示 ASPNET 仅 对 会 在 回 发 请 求 或 回调 期 
间 在 控件 上 所 引发 的 特定 事件 进行 验证 。 这 里 ， 为 了 保证 事件 的 正常 运行 ， 将 其 进行 屏蔽 。 
至 此 ， 本 页 面 功能 全 部 实现 ， 预 览 界面 如 图 7.66 所 示 。 


初 友 类 到 这 个 网 站 ， 感 二 个 网站 把 好 的 ， 牧 比 过 计 攻 ,网 9 以 后 入 加 来 P04 


相关 回复 
让 守卫 训 休 和 网站 的 十 从 ， 区 ji 下 次 沈 信 4 
大 站 入 【入 计生 : zocc-3-8 5.00.313 


我 是 3 JE 于， 由于 习 人 交 因此 有 4cr 1 指 建 一 个 关 于 的 个 人 了 和， 以 此 记录 地 的 全 万 
程 ， 不 姑 和 位 前 雪 对 基于 六 位 一 个 PS ， 有 问 妹 议 ! 日 前 ， 我 基于 不 妇 读 从 河 下 竹 ， 所 以 请 大 家 过 未 措 竹 ， 阿 厅 1 
不 站 设 有 什么 器 基 竺 的 书 竺 ,请 大 学 才 发言 


用 记 9: wininistrator; 吉 罗 3 111111 


图 7.66 页 面 预览 
7.3.2 留言 回复 页 面 
在 上 一 小 节 中 ， 介 绍 了 留言 管理 页 面 的 实现 。 其 中 ， 为 留言 的 回复 创建 了 一 个 链接 ， 
链接 的 页 面 为 LY_Reply.aspx。 下 面 ， 将 介绍 该 页 面 的 具体 实现 。 
1. 页 面 的 基本 布局 


按 如 图 7.67 所 示 布 局 页 面 。 
在 此 页 面 中 ， 根 据 页 面 传递 的 参数 ID， 获取 所 要 回复 的 留言 的 相关 信息 ， 包 括 标题 和 
内 容 。 页 面 中 ， 所 需 输入 的 内 容 仅 仅 包括 回复 内 容 。 


* Sle 


“182。 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


7.67 页 面 基 本 框架 
2. 添加 相应 的 ASP.NET 控件 


(1) 先 添加 一 个 数据 集 ， 用 于 获取 指定 ID 的 留言 信息 。 
打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 因 按 钮 ， 在 弹出 的 菜单 
中 选择 【数据 集 】 命 令 ， 将 弹出 【数据 集 】 对 话 框 ， 如 图 7.68 所 示 。 


图 7.68 【数据 集 】 对 话 框 


(2) 在 此 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSetl ， 连 接 为 Cnn， 选 择 数 据 表 LYInfo， 
同时 设置 筛选 条 件 为 字段 ID 等 于 URL 参数 ID。 

(3) 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 标签 控件 至 表格 中 文本 “引用 标题 ”后 的 单 
元 格 中 ， 此 时 将 弹出 【asp: 标 签 】 对 话 框 ， 如 图 7.69 所 示 。 


7.69 设置 标签 控件 


* 
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单 击 【 绑 定 动态 数据 】 按 钮 辐 ， 在 弹出 的 【动态 数据 】 对 话 框 中 ,选择 数据 集 DataSetl 
下 的 字段 Tile， 如 图 7.70 所 示 。 


59: [ Os Dataset! Fieldyalue CTitle”, 


7.70 【动态 数据 】 对 话 框 

单 击 【 确 定 】 按 钮 ， 返 回 【asp: 标 签 】 对 话 框 ， 再 次 单 击 【 确 定 】 按 钮 ， 完 成 该 标签 的 
设置 。 

(4) 重复 以 上 操作 ， 添 加 新 的 标签 控件 至 引用 内 容 后 的 单元 格 中 。 将 标签 名 设置 为 
Label2， 同 时 单 击 【 绑 定 动态 数据 】 按 钮 别 ， 选 择 数 据 集 DataSetl 下 的 字段 Content 作为 
其 显示 文本 。 

(5) 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 文本 框 控件 至 回复 内 容 后 的 单元 格 中 ， 此 时 
将 弹出 【asp: 文 本 框 】 对 话 框 ， 如 图 7.71 所 示 。 

设置 其 ID 为 Reply， 文 本 模式 为 多 行 ， 列 数 为 44， 行 数 为 6， 同 时 单 击 【 绑 定 动态 数 
据 】 按 钮 型， 选择 数据 集 DataSetl 下 的 字段 Reply 作为 其 文本 内 容 。 


ky 
mn | 


文本 Se DatSetl Fieldyalue CReply” 到 


7.71 添加 文本 框 控件 Reply 


(6) 为 了 便于 更 新 记录 ， 还 需 添加 一 个 隐藏 域 来 存储 指定 要 更 新 记录 的 ID， 该 ID 的 
值 可 从 页 面 的 URL 参数 获取 ， 也 可 从 数据 集中 的 字段 ID 获取 。 

单 击 【ASPNET- 插 入 】 工 具 栏 中 的 【更 多 标签 】 按 钮 国 ， 在 弹出 的 【标签 选择 器 】 对 
话 框 的 【HTML 标签 】| 【表单 】 分 类 中 ， 选 择 “input type="Hidden"”， 如 图 7.72 所 示 。 

单 击 【 插 入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 设 置 其 名 称 为 “lyid”， 值 为 
“<%# DataSetl.FieldValue("id", Container) %>”， 如 图 7.73 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 隐藏 域 的 添加 操作 。 
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《input + 
eh 


e="hidden” nane= 
lang= languagecode 》 


图 7.73 ”隐藏 域 的 标签 编辑 器 
3. 添加 更 新 记录 功能 


打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 困 按钮 ， 在 弹出 的 菜单 
中 选择 【更 新 记录 】 命 令 ， 将 弹出 【更 新 记录 】 对 话 框 ， 如 图 7.74 所 示 。 


图 7.74 【更 新 记录 】 对 话 框 


在 【提交 值 ， 自 】 下 拉 列 表 框 中 选择 当前 页 面 中 的 表单 元 素 Form1， 在 【连接 】 下 拉 
列表 框 中 选择 Cnn， 在 【更 新 表格 】 下 拉 列 表 框 中 选择 LYInfo。 在 【 列 】 列 表 框 中 需要 进 
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行 操作 的 列 包括 ID 和 Reply 两 列 。 选 择 ID 列 ， 在 【 值 】 下 拉 列 表 框 中 选择 前 面 定义 的 隐 

藏 域 标识 lyid; 选择 Reply 列 ， 在 【 值 】 下 拉 列 表 框 中 选择 前 面 定义 的 文本 框 控 件 Reply。 

最 后 ， 在 【如 果 成 功 ， 则 转 到 】 文 本 框 中 输入 “adminaspx”， 即 当 数 据 更 新 成 功 后 页 面 自 

动 跳 转 至 admin.aspx 页 面 (留言 管理 页 面 )。 单 击 【 确 定 】 按 钮 ， 完 成 更 新 记录 的 设置 。 
至 此 ， 留 言 回复 页 面 的 功能 全 部 完成 ， 预 览 界 面 如 图 7.75 所 示 。 


图 7.75 页 面 预览 


相 比 之 下 ， 可 以 发 现在 Dreamweaver 8 中 实现 记录 的 更 新 比 通过 编写 代码 实现 更 新 记 
录 要 方便 和 快捷 得 多 。 


7.4 管理 员 登 录 页 面 


在 该 留言 短 系 统 中 ， 还 有 一 个 重要 页 面 没有 介绍 ， 那 就 是 管理 员 的 登录 页 面 。 这 个 页 
面 是 非常 重要 的 ， 对 于 普通 的 用 户 只 能 在 前 台 的 页 面 中 进行 操作 ， 如 添加 留言 、 浏 览 留言 
等 。 而 后 台 页 面 中 的 相关 操作 ， 仅 在 用 户 以 管理 员 的 身份 登录 后 方 可 进行 。 

这 一 节 将 叙述 管理 员 登 录 页 面 Login.aspx 的 实现 。 具 体 步 骤 如 下 。 

(1) 页 面 基本 框架 的 设计 ， 如 图 7.76 所 示 。 


图 7.76 页 面 基本 框架 
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可 以 看 出 ， 所 添加 的 文本 框 用 于 输入 管理 员 的 用 户 名 称 ， 密 码 框 用 于 输入 用 户 密码 ， 
而 标签 则 用 于 显示 相关 的 错误 信息 。 

(2) 添加 用 户 名 称 对 应 的 文本 框 控件 。 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 文本 框 控 
件 至 用 户 名 称 后 的 单元 格 中 ， 按 如 图 7.77 所 示 设 置 其 属性 。 


图 7.77 添加 文本 控件 UserName 


(3) 添加 用 户 密码 对 应 的 密码 框 控件 。 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 文本 框 控 
件 至 用 户 密码 后 的 单元 格 中 ， 按 如 图 7.78 所 示 设 置 其 属性 。 


图 7.78 添加 密码 框 控 件 UserPwd 


(4) 拖 动 【ASP.NET- 插 入 】 工 具 栏 中 的 标签 控件 至 【提交 】 按 钮 下 的 单元 格 中 ， 设 置 
其 可 见 属性 为 不 可 见 ， 如 图 7.79 所 示 。 


旬 疯 Label - 祥 式 革 息 
布局 
Er 
能 
日 事件 Et 式 三 了 
DaDataaindine 2 
OaDisposed 字体 称 : 厂 一 一 一 一 一 一 一 
anit 
Load 放 人 大 人 三 一 
Ourr eken 站 条 
OulaLond Se 
5 FoR 
万 天 
F 大山 
FF EB 用 
取消 复 这 框 太 后 用 视 | 
?标签 信息 
| 


图 7.79 设置 Label 控件 的 可 见 属性 
同时 设置 该 标签 控件 的 文本 为 “用 户 名 及 密码 错误 ! ”， 设 置 其 字体 颜色 为 红色 。 
(5) 为 了 验证 用 户 输入 的 正确 性 ， 需 要 创建 一 个 数据 集 。 打 开 【 应 用 程序 】 面 板 组 ， 
切换 至 【服务 器 行为 】 面 板 ， 单 击 因 按 钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命 令 ， 将 弹出 
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【数据 集 】 对 话 框 ， 如 图 7.80 所 示 。 


Ee JJ 
mr [mr | 
ER 
sales | [| 

列 :个 主语 。“ 达 定 的 -至 -| 


7.80 【数据 集 】 对 话 框 
(6) 设置 数据 集 名 称 为 DataSet1， 数 据 库 连接 选择 Cnn， 在 【表格 】 下 拉 列 表 框 中 选 
择 UserInfo, 同时 设置 筛选 条 件 : 字 段 UserName 等 于 表单 变量 UserName 即 数据 表 UserInfo 
中 的 字段 UserName 的 值 等 于 用 户 在 表单 元 素 UserName 输入 的 值 。 但 是 , 一 个 条 件 是 不 够 
的 。 判 断 一 个 用 户 是 否 为 管理 员 ， 除 了 验证 用 户 名 还 需 验 证 所 输入 的 密码 是 否 正确 。 
(7) 单 击 【 高 级 】 按 钮 ， 在 弹出 的 对 话 框 中 显示 了 包含 过 滤 条 件 的 SQL 语句 以 及 定义 
的 参数 ， 如 图 7.81 所 示 。 


Eek 


图 7.81 记录 集 的 高 级 设置 


(8) 单 击 叶 | 按钮 ， 添 加 一 个 新 的 参数 。 此 时 ， 将 弹出 【添加 参数 】 对 话 框 ， 如 图 7.82 
所 示 。 输 入 参数 名 称 “@UserPwd”， 设置 参数 类 型 为 VarChar， 参 数 的 值 可 通过 单 击 Build 
按钮 打开 【生成 值 】 对 话 框 来 创建 ， 如 图 7.83 所 示 。 


rr [3 
hm 可 职 汉 
gp 一 至 -| EE33 习 
[一 im | el 
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7.82 【添加 参数 】 对 话 框 7.83 【生成 值 】 对 话 框 
在 【和 名称】 文本 框 中 输入 前 面 在 表单 中 创建 的 密码 框 的 ID 值 UserPwd， 从 【 源 】 下 拉 
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列表 框 中 选择 【表单 变量 】， 单 击 【 确 定 】 按 钮 。 此 时 ， 在 【添加 参数 】 对 话 框 中 可 以 看 
到 所 创建 的 参数 的 值 ， 如 图 7.84 所 示 。 


i 
es ere, 3 |_w | 


7.84 【添加 参数 】 对 话 框 


(9) 在 参数 @UserPwd 的 值 中 ，IIF 函数 用 于 对 表单 变量 UserPwd 的 值 是 否 为 Null 进 
行 判断 。 如 果 为 空 ， 则 返回 空 字 符 串 ;如 果 不 为 空 ， 则 返回 该 表单 变量 的 值 。 单 击 【 确 定 】 
按钮 ， 即 可 完成 参数 的 添加 。 此 时 ， 还 需 在 SQL 语句 中 添加 一 个 条 件 表达 式 以 判断 密码 是 
否 正确 ， 如 图 7.85 所 示 。 


图 7.85 数据 集 的 高 级 设置 
(10) 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 根 据 数据 集中 的 记录 是 否 为 空 ， 可 以 判 


断 用 户 输入 的 用 户 名 及 密码 是 否 正确 。 那 么 如 何 判 断 数据 集中 是 否 有 记录 呢 ， 这 可 以 通过 
绑 定 字段 来 实现 。 
打开 【应 用 程序 】 面 板 组 ， 切 换 至 【 绑 定 】 面 板 ， 将 数据 集 下 的 字段 UserName 拖 至 
面 的 任何 位 置 ， 因 为 这 里 只 用 它 来 检查 数据 集中 是 否 有 记录 ， 同 时 判断 该 绑 定 字段 的 值 
: 否 为 空 。 如 果 不 为 空 ， 则 说 明 用 户 输入 的 用 户 名 及 密码 正确 ， 直 接 将 页 面 跳 转 至 留言 管 
页 面 Admin.aspx， 此 操作 可 通过 一 个 自 定义 的 函数 CheckValue 来 实现 。 

(11) 将 视图 切换 至 【代码 】 视 图 ， 找 到 绑 定 字段 相应 的 代码 ， 将 其 修改 成 调用 自 定义 
函数 CheckValue， 如 图 7.86 所 示 。 
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a colspar=2 a Label ForeColor=" #FFO000” ID="Labell” runat 


="server” 
《<W# CheckYalue (DataSet ys: PT (“UserName”, 
Try 


Container)) %>KAtd> 


7.86 修改 代码 


然后 在 代码 中 添加 自 定义 函数 CheckValue 的 代码 以 及 【提交 】 按 钮 的 单 击 事件 ， 代 码 
如 下 : 


【示例 代码 】 
<script Language="VB" runat="server"> 
"定义 函数 checkValue 
Function CheckValue (Byval Strl Rs String) Rs String 
if Strl<>nothing then 
' 当 所 传递 的 绑 定 字段 的 值 不 为 空 时 ， 验 证 成 功 ， 页 面 跳 转 至 Rdmin .aspx 
Response.redirect ("Admin.aspx") 
end if 
End Function 
Sub Sure Click(ByVal Sender As Object, ByVal E As EventArgs) 
' 显 示 错误 信息 
Labell.visible=true 
End Sub 
</script> 


在 【提交 】 按 钮 的 单 击 事件 Sure_Click 中 , 只 添加 了 一 条 语句 , 将 标签 Labell 的 Visible 
属性 设置 为 True， 显 示 错 误 信 息 。 这 是 由 于 如 果 执 行 到 此 事件 代码 ， 则 只 有 一 个 原因 ， 那 
就 是 用 户 输入 的 用 户 名 或 密码 不 正确 。 因 为 ， 如 果 验 证 成 功 ， 则 页 面 在 执行 自 定义 函数 
CheckValue 时 便 已 跳 转 至 留言 管理 页 面 了 ， 而 执行 不 到 【提交 】 按 钮 的 单 击 事件 这 一 步 。 

至 此 ， 管 理 员 登录 页 面 的 功能 全 部 完成 ， 预 览 界面 如 图 7.87 所 示 。 


7.87 页 面 预览 
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7.5 习 题 
(1) 熟悉 在 Dreamweaver 8 中 操作 各 种 ASPNET 控件 的 方法 ， 掌 握 ASPNET 控件 的 


添加 和 相关 属性 的 设置 。 
(2) 添加 用 来 新 增 和 修改 管理 员 信 息 的 (允许 修改 用 户 名 和 密码 ) 页 面 。 
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上 一 章 介 绍 了 留言 和 的 制作 , 相信 读者 对 在 Dreamweaver 8 中 开发 ASP.NET 应 用 程序 
己 经 有 了 一 个 基本 的 了 解 。 这 一 章 ， 将 继续 介绍 会 员 管 理 系 统 的 实现 。 


8.1 系统 分 析 


会 员 管理 主要 用 于 对 站 点 的 会 员 进 行 管理 ， 它 可 以 是 一 个 独立 的 系统 ， 也 可 被 整合 到 
其 他 的 应 用 程序 中 ， 例 如 论坛 。 对 于 一 个 专业 的 网 站 ， 会 员 管 理 是 必要 的 。 这 样 不 但 可 以 
为 注册 会 员 提 供 更 多 更 好 的 服务 ， 同 时 还 也 可 以 防止 站 内 资源 被 其 他 网 站 非法 盗 链 。 


8.1.1 系统 功能 
作为 一 个 最 基本 的 会 员 管理 系统 ， 主 要 包括 会 员 注册 、 会 员 登 录 、 找 回 密 码 、 修 改 信 


息 等 几 项 功能 。 而 更 为 复杂 的 会 员 管理 ， 还 包括 会 员 级 别 的 设置 、 会 员 点 数 的 设置 以 及 浏 
览 权 限 设置 等 多 项 功能 ， 这 里 仅 介绍 会 员 管理 系统 中 最 基本 的 功能 。 


1. 会 员 注 册 

允许 用 户 注册 为 站 点 的 新 会 员 。 在 注册 的 同时 ， 要 求 用 户 输入 正确 的 邮箱 地 址 。 在 注 
册 成 功 后 ， 系 统 自动 发 送 验 证 邮件 至 指定 的 邮箱 中 ,用户 收 取 邮 件 后 ， 单 击 邮 件 中 的 链接 ， 
进行 账户 激活 。 只 有 激活 ， 用 户 方 可 正常 登录 。 

2. 会 员 登 录 

用 户 根据 注册 的 用 户 名 和 密码 进行 登录 。 在 进行 验证 时 ， 不 仅 需 要 验证 用 户 名 和 密码 
的 正确 性 ， 还 要 判断 用 户 是 否 已 经 激活 账户 。 

3. 找 回 密码 

当 用 户 忘记 自己 的 密码 时 ， 可 通过 此 操作 来 找 回 自己 的 密码 。 在 操作 中 ， 用 户 需 提 供 
用 户 名 以 及 正确 的 出 生日 期 ， 并 回答 在 注册 时 所 设置 的 密码 提示 问题 的 答案 。 

4. 修改 信息 

修改 用 户 注 册 时 所 填写 的 个 人 信息 ， 同 时 提供 修改 密码 的 功能 。 
8.1.2 数据库 的 建立 


本 系统 使 用 Microsoft Access 2000 数据 库 ， 其 数据 库 名 为 UserInfo.Mdb， 在 该 数据 库 
中 仅 有 UserSheet( 用 户 信息 表 ) 一 个 数据 表 。 
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1. 用 户 信息 表 (UserSheet) 
UserSheet 数据 表 主 要 用 于 存储 用 户 的 基本 信息 ， 其 表 结构 见 表 8.1。 


表 8.1 UserlSheet 数据 表 


字段 名 数据 类 型 字段 描述 
Code 自动 编号 用 户 编号 
LoginName 文本 表示 用 户 的 登录 名 称 
UserPass 文本 表示 用 户 的 登录 密码 50 
UserName 文本 表示 用 户 的 真实 名 称 50 
Birth 日 期 /时 间 表示 出 生日 期 
Email 文本 表示 邮箱 地 址 100 
PassQuestion 文本 表示 密码 提示 问题 lw | | 
BassAnower 文本 表示 密码 提示 问题 的 答案 | 100 | 和 ” | 
Address x 本 | 志和 
Teh 文本 
Ta 文本 
Works 文本 示 用 户 的 工作 单位 [io | | 
ZipCode 文本 表示 邮政 编码 
sex 文本 表示 用 户 性 别 
JHTag 文本 账号 是 否 激活 标识 ll | 


说 明 : 字段 HTag 表示 用 户 的 账号 是 否 激活 ; 其 值 为 0 表示 未 激活 ， 为 1 表示 已 激活 ， 默 
认 值 为 0。 


8.1.3 ”站 点 设置 


本 例 中 ， 站 点 设置 的 本 地 信息 如 图 8.1 所 示 。 

其 中 ， 站 点 名 称 设 置 为 “会 员 管 理 ”， 本 地 根 文 件 夹 设置 为 会 员 管理 系统 所 在 的 磁盘 
目录 ， 默 认 图 像 所 在 的 文件 夹 设置 为 会 员 管 理 系统 下 的 Image 目录 。 此 外 ，HTTP 地 址 为 
“http:Wlocalhostuser”。 当 然 ， 在 此 之 前 需 用 要 将 会 员 管理 系统 设置 为 Web 共享 ， 其 共享 
名 为 “user”。 

站 点 设置 中 ， 远 程 信息 设置 如 图 8.2 所 示 。 

由 于 对 用 户 管理 系统 的 设计 、 测 试 和 运行 均 是 在 本 机 上 操作 的 ， 因 此 这 里 将 访问 方式 
设置 为 【本 地 /网 络 】， 而 远 端 文件 夹 则 与 本 地 根 文件 夹 设置 为 相同 的 目录 。 

站 点 设置 中 ， 测 试 服务 器 设置 如 图 8.3 所 示 。 
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图 8.3 测试 服务 器 
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对 于 站 点 的 部 署 , 在 上 一 章 中 已 经 进行 了 详细 的 介绍 ,本 章 
不 再 更 述 。 需 要 记 住 的 是 ， 必 须 对 站 点 进行 部 署 ; 否则 ， 系 统 是 
无 法 正常 运行 的 。 
8.1.4 定义 数据 库 连 接 


在 介绍 各 项 功能 的 具体 实现 之 前 ， 要 先 定 义 一 个 数据 库 连 
接 ， 这 是 在 Dreamweaver 8 中 进行 数据 库 操作 的 必要 前 提 。 

在 Dreamweaver 8 中 打开 所 定义 的 站 点 “会 员 管 理 ”， 新 建 
一 个 ASP.NET 页 面 ， 打 开 【 应 用 程序 】 面 板 组 ， 选 择 【数据 库 】 
面板 ， 如 图 8.4 所 示 。 图 8.4 【数据 库 】 面 板 

单 击 因 按 钮 ， 在 弹出 的 菜单 中 选择 【OLE DB 连接 】 命 令 。 

此 时 ， 系 统 将 弹出 【OLE DB 连接 】 对 话 框 ， 如 图 8.5 所 示 。 


EJ 入 施 定 | 服务 器 行为 | 组 件 


若 要 在 该 页 面 上 使 用 动态 数据 : 

v 1 为 该 文件 创建 站 点 。 
v2 选择 一 种 文档 类型。 

v 。 3。 设置 站 点 的 测 吉 服务 器 
总 二 + 3 于 
连 毛 ， 
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图 8.5 【OLE DB 连接 】 对 话 框 


在 连接 名 称 中 输入 “Cnn”， 单 击 【 建 立 】 按 钮 ， 在 弹出 的 Data Link Properties 对 话 框 
中 ， 单 击 Provider 标签 ， 选 择 Microsoft Jet 4.0 OLE DB Provider。 然 后 ， 单 击 Connection 
标签 ， 如 图 8.6 所 示 。 

单 击 [浏览 按钮 二 , 选择 会 员 管 理 磁盘 目录 下 的 Microsoft Access 数据 库 UserInfo.mdb 
作为 连接 的 对 象 。 单 击 【 确 定 】 按 钮 ， 返 回 【OLE DB 连接 】 对 话 框 ， 并 再 次 单 击 【确定 】 
按钮 ， 完 成 数据 库 连接 的 创建 。 此 时 ， 在 【应 用 程序 】 面 板 组 中 的 【数据 库 】 面 板 中 将 会 
显示 用 户 刚才 创建 的 数据 库 连 接 ， 如 图 8.7 所 示 。 

[oats int Properties | 
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园 VserSheet 
视图 
名 预存 过 程 
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CJ | Ww | 
8.6 切换 至 Connection 选项 卡 图 8.7 【数据 库 】 面 板 
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8.2 用 户 注 册 


用 户 注册 的 整个 操作 可 分 为 5 个 步骤 ， 首 先是 站 点 用 户 注 册 的 许可 协议 ， 在 同意 协议 
之 后 ， 进 入 用 户 资料 的 填写 过 程 ， 该 页 面包 括 必 填 信息 和 选 填 信息 。 然 后 ， 显 示 用 户 所 填 
写 的 资料 ， 进 行 资料 确认 。 最 后 ， 将 数据 保存 至 数据 库 中 ， 提 示 注 册 成 功 ， 并 发 送信 息 至 
户 所 填写 的 电子 邮箱 中 ， 要 求 用 户 接收 邮件 并 激活 账户 。 

对 于 各 个 步骤 操作 界面 的 切换 ， 可 通过 ASPNET 中 的 Panel 控件 来 实现 。 


8.2.1 许可 协议 


用 户 注册 时 ， 要 获得 许可 协议 ， 具 体操 作 如 下 。 

(1) 新 建 一 个 ASPNET 页 面 ， 将 其 保存 为 Login.aspx。 然 后 ， 添 加 一 个 表单 Form， 
设置 其 ID 为 Reg， 同 时 切换 至 【代码 】 视 图 ， 在 Form 中 添加 属性 “Runat="Server"”。 

(2) 切换 至 【设计 】 视 图 ， 单 击 【ASP.NET- 插 入 】 工 具 栏 中 的 髓 按钮 ， 在 弹出 的 【 标 
签 选择 器 】 对 话 框 中 ， 选 择 【ASP.NET 标签 】|【Web 服务 器 】 分 类 ， 并 在 右边 的 列表 框 中 
选择 asp:Panel， 如 图 8.8 所 示 。 


合 标 答 放 择 器 x 


图 8.8 【标签 选择 器 】 对 话 框 


将 光标 置 于 表单 内 ， 单 击 【 插 入 】 按 钮 ， 此 时 将 弹出 【标签 编辑 器 -Panel】 对 话 框 。 
在 【常规 】 分 类 选项 中 ， 设 置 其 ID 属性 为 Step1， 如 图 8.9 所 示 。 
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图 8.9 【标签 编辑 器 -Panel】 对 话 框 
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同时 ， 在 【布局 】 选 项 中 ， 设 置 其 高 度 为 300 像素 ， 宽 度 为 600 像素 。 单 击 【 确 定 】 
按钮 ， 返 回 【标签 选择 器 】 对 话 框 ， 单 击 【 关 闭 】 按 钮 ， 完 成 Panel 控件 的 插入 。 

(3) 重复 以 上 操作 , 再 次 添加 3 个 Panel 控件 , 分 别 设置 其 ID 为 Step2、Step3 和 Step4。 
至 此 ， 在 页 面 上 已 经 添加 了 4 个 Panel 控件 ， 它 们 分 别 用 于 包含 用 户 注 册 中 许可 协议 、 填 
写 个 人 资料 、 确 认 信息 和 注册 成 功 共 4 个 步骤 的 操作 界面 。 


提示 : Panel 服务 器 控件 主要 用 于 为 其 他 控件 提供 容器 . 通过 设置 Panel 控件 的 显示 或 隐藏 ， 
可 同时 显示 或 隐藏 该 控件 内 的 所 有 控件 。 


(4) 在 Panel 控件 Stepl 中 ， 添 加 一 个 表格 ， 并 添加 相关 的 注册 协议 ， 详 细 操 作 不 再 叙 
述 ， 如 图 8.10 所 示 。 


Macremedia Dreamweaver 8 - [E\Book\ASPNET( 四 )\bookVexample\ 会 员 管 理 \ioginaspXKXHTML 
文件 全 术 误 日 查看 (W) 拍 和 UD 修 浆 (W) 文本 (D 命 人 (CO) 站 点 (5) 窗 Du 和 bd 


bi 电台 名 | 国 目 国 - 牧 - 国 玉 @| 国 - 史 


[Voy or jon as 207v E71 0 直 和 地 项 Be 中， 日 志 _。 


8.10 注册 协议 


在 注册 协议 下 ， 需 提供 两 个 操作 按钮 ， 分 别 是 【同意 】 和 【不 同意 】。 当 单 击 【同意 】 
按钮 时 ， 将 进入 下 一 步骤 ， 当 单 击 【 不 同意 】 按 钮 时 ， 将 返回 用 户 登 录 页 面 。 

(5) 在 【ASPNET- 插 入 】 工 具 栏 中 ， 拖 动 一 按钮 至 注册 协议 下 的 单元 格 中 ， 在 弹出 
的 【asp: 按 钮 】 对 话 框 中 ， 设 置 其 ID 为 Agree， 显 示 文 本 为 “同意 ”， 如 图 8.11 所 示 。 


8.11 添加 按钮 控件 Agree 
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(6) 单 击 【确定 】 按 钮 ， 完 成 插入 。 在 页 面 上 选择 该 按钮 并 右 击 ， 从 弹出 的 菜单 中 选 
择 【 编 辑 标签 】 命 令 。 在 弹出 的 【标签 编辑 器 -Button】 对 话 框 中 ， 取 消 【 常 规 】 分 类 下 的 
【原因 确认 】 复 选 框 的 选择 ， 如 图 8.12 所 示 。 
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图 8.12 标签 编辑 器 


【原因 确认 】 复 选 框 对 应 的 是 按钮 控件 的 CausesValidation 属性 。 该 属性 用 于 指示 当 单 
击 该 按钮 时 是 否 执行 页 面 验证 。 由 于 在 用 户 注册 的 第 二 步 ( 即 填写 个 人 资料 ) 中 ， 将 会 设置 
相应 的 验证 控件 来 对 用 户 的 输入 进行 验证 。 因此 , 这 里 将 该 按钮 的 CausesValidation 属性 设 
置 为 Flase， 以 避免 由 于 页 面 验证 不 通过 而 导致 无 法 正常 执行 按钮 的 单 击 事件 代码 。 
(7) 选择 【事件 】IOnClick 分 类 , 在 右 侧 的 文本 框 中 输入 事件 名 Agree_Click, 如 图 8.13 
所 示 。 


标签 编辑 器 - Button 


图 8.13 设置 按钮 的 单 击 事件 


这 里 ， 设 置 了 按钮 Agree 的 单 击 事件 为 Agree_Click， 该 事件 代码 将 在 【代码 】 视 图 中 
进行 编写 。 

(8) 重复 以 上 步 又， 添加 一 个 新 的 按钮 控件 ， 设 置 其 ID 为 NotAgree， 显 示 文本 为 “不 
同意 ”。 同 时 ， 在 【标签 编辑 器 】 对 话 框 中 ， 取 消 该 按钮 的 【原因 确认 】 复 选 框 的 选择 ， 
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设置 其 单 击 事件 为 NotAgree_Click。 
(9) 切换 至 【人 代码】 视图， 编写 页 面 加 载 时 所 执行 的 Page_ Load 事件 及 各 按钮 的 单 击 
事件 ， 代 码 如 下 : 


【示例 代码 】 
<script runat="server"> 
' 添 加 Page_Load 事件 
Sub Page Load(Sender Rs Object,E As EventArgs) 
Dim i As Integer 
if (not Page.IsPostBack) 
' 设 置 stepl 可 见 ， 其 他 的 Panel 控件 隐藏 
stepl.visible=True 
step2.visible=false 
step3.visible=false 
step4.visible=false 
end if 
End Sub 
' 添 加 【同意 】 按 钮 的 单 击 事件 
Sub Agree Click(Sender As Object,E Rs EventArgs) 
"设置 step2 可 见 ， 其 他 的 Panel 控件 隐藏 
stepl .visible=false 
step2.visible=true 
step3.visible=false 
step4.visible=false 
End Sub 
"添加 【不 同意 】 按 钮 的 单 击 事件 
Sub NotAgree _ Click(Sender As Object,E As EventRrgs) 


"将 页 面 跳 转 至 用 户 登 录 页 面 
page.response.redirect ("default .aspx") 
End Sub 
</script> 
此 时 ， 用 户 注册 的 第 1 步 操 作 设计 完成 ， 预 览 效 果 如 图 8.14 所 示 。 
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当 单 击 【同意 】 按 钮 时 ， 将 进入 下 一 步 操作 ; 当 单 击 【不 同意 】 按 钮 时 ， 将 返回 用 户 
登录 页 面 。 
8.2.2 填写 个 人 资料 

下 面 ， 来 看 用 户 注册 中 第 2 步 操作 的 设计 ， 即 填写 个 人 资料 。 在 此 步 操作 中 ， 主 要 是 
提供 各 种 文本 框 或 选择 框 以 供用 户 输入 或 选择 。 

1. 设计 填写 人 个 资料 的 功能 界面 


在 ID 为 Step2 的 Panel 控件 中 ， 添 加 一 个 表格 ， 并 插入 各 种 文本 和 相关 输入 控件 ， 如 
图 8.15 所 示 。 
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图 8.15 填写 个 人 资料 功能 界面 


在 图 中 , 用 文字 标记 了 各 个 文本 框 控 件 和 下 拉 列 表 框 控件 所 对 应 的 ID 名 称 。 这 里 , 不 
再 对 各 个 控件 的 插入 操作 进行 详细 的 叙述 。 对 于 其 中 部 分 控件 说 明 如 下 。 
@ ”对 于 登录 口令 和 确认 口令 对 应 的 文本 框 thePass 和 PassSure, 其 文本 框 类 型 均 应 设 
置 为 【密码 】。 
@ 性别 选项 对 应 的 是 单 选 按钮 列表 控件 RadioButtonList 控件 ), 其 中 的 选项 包括 “ 男 ” 
和 “ 女 ”， 其 代码 定义 如 图 8.16 所 示 。 


“ID align=“right” becolor="“white” > 性 tnbsp:&nbsp:&nbsp:&nbsp: 别 : 《</TD> 
《ID vAlign=“top”bgcolor= "white”zstyle= "padding-left:5px: 》 


asp:RadioButtonList id=” Sex”Runat= serVer”RepeatDirection= Horizontal > 
《asp:ListIten Value=" 男 ” Selected= “True"> 男 人 /asp:ListIten> 
《asp:ListItem Value=" 女 "> 女 /asp:ListItemy> 
《yasp:RadioButtonList》 
<7TDy 
LOTR> 


8.16 定义 RadioButtonList 控件 
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@ ”对 于 出 生日 期 中 的 年 、 月 、 日 三 个 下 拉 列 表 框 控件 的 数据 绑 定 ， 是 在 Page_ Load 
事件 中 进行 加 载 的 。 其 中 ， 年 度 选择 为 1920 一 2006， 月 份 选择 为 1 一 12， 日 的 选 
择 为 1 一 31， 如 图 8.17 所 示 。 


Sub Page Load(Sender As Object,E As EventAres 
Din theYear As new ArrayList i 
Dim theMonth As new ArrayList 训 义 让 个 兰 铀 ; di 
Dim theDay As new ArrayList 年 、 月 、 日 的 选择 
Din i hs Integer | 
if (not Page.IsPostBack) 

stepl. visible=True 

step2. visible=false 

step3. visible=false 

stepd. visible=false 


For i = 1920 To 2006 

Next 

or TT5 
thelMonth. Add(i. toString ()) 二 月 的 过 由 
Next 


For ET 
theDay. Add(i. toString ()) 十 一 培 殉 日 的 千村 数据 
Next 


ee databind() 
dnonth. datasource=thenonth 
dnonth. databind() 


dday. dat asource=theday 
dday. databind() 


图 8.17 绑 定年 、 月 、 日 的 选择 数据 


@ ”对 于 不 同 的 月 份 ， 其 可 供 选 择 的 日 是 不 同 的 。 例 如 ,对 于 1 月 、3 月 、5 月 、7 月 、 
8 月 、10 月 、12 月 ， 其 日 的 选择 是 1~31; 对 于 4 月 、6 月 、9 月 、11 月 , 其 
的 选择 是 1 一 30， 而 对 于 2 月 ， 则 还 必须 判断 用 户 所 选择 的 年 是 否 为 闽 年 ， 如 果 
为 状 年 ， 则 日 的 选择 为 1 一 29， 和 否则 为 1 一 28。 也 就 是 说 ， 日 的 选择 范围 是 根据 用 
户 所 选择 的 年 和 月 来 动态 决定 的 .因此 ,将 月 所 对 应 的 DropDownList 控件 Dmonth 
的 AutoPostBack( 自 动 回 发 ) 属 性 设置 为 True, 同时 设置 其 OnSelectedIndexChanged 
事件 为 ChangeDataMon， 该 事件 需 在 代码 中 进行 编写 ， 代 码 如 下 : 

【示例 代码 】 
Sub ChangeDateMon (BYVal Sender As Object, ByVal E As EventArgs) 
"定义 各 月 份 所 对 应 的 天 数 ， 其 中 2 月 份 暂 定 为 28 天 ， 即 非 半年 的 情况 
Dim Days As Integer() = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31} 
Dim i As Integer 
' 定 义 数 据 theDay， 用 于 存储 当前 用 户 所 选择 的 月 份 对 应 的 天 
Dim theDay As New ArrayList 
"判断 当前 用 户 所 选择 的 年 度 是 否 为 头 年 
IE ((Convert .ToInt32 (DYear.SelectedItem.Text.ToString()) Mod 4) = 0 
And (Convert .ToInt32 (DYear.SelectedItem.Text.ToString()) Mod 100) <> 0) 


Then 
"当前 年 度 为 闵 年 ， 修 改 数组 ， 将 2 月 份 所 对 应 的 天 数 改 为 29 天 
Days (1) = 29 
End If 


"获取 当前 用 户 所 选择 的 月 份 所 对 应 的 天 数 ， 并 通过 循环 向 数组 theDay 中 添加 数据 

For i=1 To Days (Convert .ToInt32 (DMonth.SelectedItem.Text.ToString() -1)) 
TheDay.Add (ii .ToString) 

Next 
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"将 数组 theDay 绑 定 至 日 所 对 应 的 下 拉 列 表 框 控件 Dday 中 
DDay.DataSource = theDay 
DDay.DataBind() 

End sub 


@ ”在 填写 个 人 资料 的 操作 界面 上 ， 提 供 了 两 个 操作 按钮 【检查 用 户 名 】 和 【确认 】， 
它们 所 对 应 的 单 击 事件 分 别 为 TestUser_Click 和 Surel_Click， 其 事件 代码 将 在 后 
面 进行 叙述 。 

2. 页 面 验证 控件 的 添加 


这 也 是 本 节 中 的 一 个 重点 。 所 谓 验证 控件 ， 主 要 用 来 对 用 户 的 输入 进行 检测 ， 判 断 其 

否 符 合 所 定义 的 规则 。 如 果 用 户 输入 了 不 符合 规则 的 数据 ， 则 不 允许 用 户 提交 此 页 

在 此 页 面 中 ， 需 要 进行 数据 验证 的 控件 包括 必 填 内 容 中 的 所 有 文本 框 控件 和 好 政 编码 
所 对 应 的 文本 框 控 件 , 其 控件 ID 名 称 分 别 为 theName、 thePass、passSure、Question、Answer、 
Email 和 Zip。 

下 面 看 一 下 登录 名 称 对 应 的 文本 框 控件 theName。 该 控件 需要 绑 定 两 种 验证 控件 : 一 
种 是 必须 输入 验证 控件 (RequiredFieldValidaton ， 另 一 种 是 正则 表达 式 验 证 控件 
(RegularExpressionValidator)。 

(1) 切换 至 【设计 】 视 图 ， 将 光标 置 于 标签 控件 LblTest 之 后 ， 单 击 【ASP.NET- 插 入 】 
工具 栏 中 的 国 按 钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASPNET 标签 】| 【验证 服 
务 器 控件 】 分 类 ， 并 在 右边 的 列表 框 中 选择 asp:RequiredFieldValidator， 如 图 8.18 所 示 。 


日 启 标记 语言 标签 sp ConpareVali dator 


没有 asp:RequiredFieldYalidator 的 标签 信息 。 


© | 
8.18 【标签 选择 器 】 对 话 框 
(2) 单 击 【插入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 设 置 其 ID 为 Required1， 


显示 文本 为 “请 输入 登录 名 称 ! ”， 显 示 模 式 为 “动态 ”， 要 验证 的 控件 为 theName， 错 

误 信息 为 “请 输入 登录 名 称 ! ”， 如 图 8.19 所 示 。 
(3) 单 击 【确定 】 按 钮 ， 返 回 【标签 选择 器 】 对 话 框 ， 再 单 击 【 关 闭 】 按 钮 ， 完 成 该 

验证 控件 的 插入 。 此 控件 为 必须 输入 控件 ， 要 求 用 户 必 须 在 文本 框 heName 中 输入 数据 。 
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图 8.19 设置 验证 控件 Required1 的 属性 


(4) 将 光标 置 于 验证 控件 Requiredl 之 后 ， 再 次 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 大 
按钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASPNET 标签 】|【 验 证 服务 器 控件 】 分 
类 ， 并 在 右边 的 列表 框 中 选择 asp:RegularExpressionValidator， 单 击 【 插 入 】 按 钮 ， 此 时 将 
弹出 【标签 编辑 器 】 对 话 框 ， 如 图 8.20 所 示 。 


图 8.20 设置 验证 控件 Regular1 的 属性 


(5) 在 该 对 话 框 中 ， 设 置 其 ID 为 Regularl ， 文 本 为 “格式 错误 ! ”， 要 验证 的 控件 为 
“theName”， 验 证 表达 式 为 “\w+([-+.]Ww+)*”， 显 示 模 式 为 “动态 ”， 错 误 信 息 为 “ 格 
式 错误 ! ”。 这 里 设置 了 一 个 正则 表达 式 ， 来 禁止 用 户 在 文本 框 theName 中 输入 非法 字符 。 

(6) 对 于 登录 口令 所 对 应 的 文本 框 控件 thePass， 需 添加 关联 的 必须 输入 验证 控件 
(RequiredFieldValidator)， 其 属性 设置 如 图 8.21 所 示 。 
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图 8.21 设置 验证 控件 Required2 的 属性 


对 于 确认 口令 所 对 应 的 文本 框 控件 PassSure ， 需 添加 关联 的 比较 验证 控件 
(CompareValidator)， 其 属性 设置 如 图 8.22 所 示 。 


图 8.22 设置 验证 控件 Compare1 的 属性 


这 里 所 设置 的 验证 的 控件 ， 用 于 比较 确认 口令 与 用 户口 令 所 对 应 的 文本 框 的 值 是 否 一 
致 。 如 果 不 一 致 ， 则 验证 失败 ， 提 示 错 误 信息 。 

对 于 提示 问题 所 对 应 的 文本 框 控件 Question， 需 添加 关联 的 必须 输入 验证 控件 
(RequiredFieldValidator)， 其 属性 设置 如 图 8.23 所 示 。 

对 于 问题 答案 所 对 应 的 文本 框 控件 Answer， 需 添加 关联 的 必须 输入 验证 控件 
(RequiredFieldValidator)， 其 属性 设置 如 图 8.24 所 示 。 

对 于 邮箱 地 址 所 对 应 的 文本 框 控件 Email， 除 了 需要 添加 关联 的 必须 输入 验证 控件 
(RequiredFieldValidator) 外 ， 还 需 添加 正则 表达 式 验证 控件 (RegularExpressionValidator) 以 保 
证 其 输入 的 正确 性 ， 其 属性 设置 分 别 如 图 8.25 和 图 8.26 所 示 。 
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图 8.23 设置 验证 控件 Required3 的 属性 


图 8.25 设置 验证 控件 Required5 的 属性 
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图 8.26 设置 验证 控件 Regular2 的 属性 
对 于 邮政 编码 所 对 应 的 文本 框 控件 Zip， 需 添加 正则 表达 式 验证 控件 


图 8.27 设置 验证 控件 Regular3 的 属性 


至 此 ， 填 写 个 人 资料 功能 的 结构 设计 完成 。 
3. 【检测 用 户 名 】 按 钮 的 单 击 事件 


【检测 用 户 名 】 按 钮 主要 用 于 检测 用 户 所 输入 的 登录 名 称 是 否 已 被 他 人 注册 ， 这 里 可 
以 通过 创建 数据 集 来 实现 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 园 按 钮 ， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 ， 将 弹出 【数据 集 】 对 话 框 ， 如 图 8.28 所 示 。 

(2) 设置 数据 集 的 名 称 为 DataSetl ， 选 择 连 接 Cnn， 选 择 表格 UserSheet， 在 筛选 条 件 
中 设置 字段 LoginName 等 于 表单 变量 theName。 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 
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8.28 ”创建 数据 集 


(3) 将 视图 切换 至 【代码 】 视 图 , 添加 【检测 用 户 名 】 按钮 的 单 击 事件 TestUser_Click， 
代码 如 下 : 
【示例 代码 】 
Sub TestUser Click(Sender As Object,E As EventArgs) 
"判断 当前 用 户 是 否 输 入 了 登录 名 称 
if trim(theName .Text)<>""” then 
"输入 了 登录 名 称 ， 判 断 数据 集 是 否 有 记录 
if datasetl.defaultView.Table.Rows.Count>0 then 
' 存 在 记录 ， 登 录 名 称 已 被 占用 
Lbltest .text=" 访 用户 名 已 被 他 人 占用 ! " 
else 
' 不 存在 记录 ， 登 录 名 称 尚未 占用 
Lbltest .text=" 该 用 户 名 尚未 被 占用 ! " 
end if 
else 
' 没 有 输入 登录 名 称 ， 不 进行 判断 ， 并 将 标签 控件 LblTest 的 值 清空 
Lbltest .text="" 
end if 
end sub 


在 以 上 代码 中 ， 首 先 对 用 户 是 否 输入 了 登录 名 称 进行 判断 。 如 果 输入 了 登录 名 称 ， 则 
获取 数据 集 DataSetl 筛选 的 结果 。 如 果 记录 数 不 为 零 ， 说 明 该 名 称 已 在 数据 库 中 存在 ， 则 
提示 用 户 名 已 占用 ， 如 果 数据 集中 没有 记录 ， 说 明 没有 查询 出 结果 ， 提 示 用 户 名 尚未 被 占 
。 如果 用 户 没有 输入 登录 名 称 , 此 时 无 须 对 数据 集 进行 判断 , 直接 将 提示 文本 标签 LblTest 
清空 即 可 。 

4. 【确定 】 按 钮 的 单 击 事件 

事实 上 ， 【确定 】 按 钮 在 此 并 不 执行 保存 数据 的 操作 ， 它 仅仅 是 将 用 户 所 填写 的 个 人 
资料 信息 赋值 给 “确认 信息 ”功能 中 的 各 个 标签 文本 ， 并 完成 填写 个 人 资料 的 操作 ， 进 入 
用 户 注册 的 下 一 步骤 ， 确 认 信息 。 而 数据 的 保存 操作 ， 也 将 在 “确认 信息 ”步骤 中 进行 。 
以 下 是 【确定 】 按 钮 的 单 击 事件 代码 : 
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【示例 代码 】 

Sub Surel Click(Sender As Object,E As EventArgs) 
LblLoginName.Text = theName.Text ' 显 示 登 录 名 称 
LblPwd.Text =thePass.Text ' 显 示 登 录 密 码 
LblQuestion.Text =Question.Text “' 显 示 提 示 问 题 
LblAnswer.Text = Answer.Text “' 显 示 问 题 答案 
LblName .Text = UserName .Text “' 显 示 真 实名 称 
LblSex.Text = Sex.SelectedItem.Text “' 显 示 性 别 
LblBirth.Text = DYear.SelectedItem.Text & "-" & DMonth.SelectedItem.Text 

& "-" & DDay.SelectedItem.Text “显示 出 生日 期 
LblWork.Text = job.Text “显示 工作 单位 
LblTel.Text = tell.Text “显示 固定 电话 
LIblTell.Text = tel2.Text ' 显 示 移动 电话 
LblAdqdr.Text = addr.Text ' 显 示 联系 地 址 
Lbl2ip.Text = zip.Text ' 显 示 邮 政 编码 
Lblemail.Text = email.Text ' 显 示 邮 箱 地 址 
stepl.Visible = False “隐藏 第 1 步 操作 界面 
step2.Visible = False ' 隐 藏 第 2 步 操作 界面 
step3.Visible = True ' 显 示 第 3 步 操作 界面 
step4.Visible = False ' 隐 藏 第 4 步 操作 界面 
LblErr.Text="" “清空 “确认 信息 ”步骤 中 的 错误 信息 

End Sub 


至 此 ， 用 户 注册 的 第 2 步 操作 设计 完成 ， 预 览 效果 如 图 8.29 所 示 。 


met Explorer 


| 文件 E) 躺 辑 钊 查看 (9 收 起 (8) 工具 (D 六 助兴 
EPE J :RL 
hk(D) [OY) hetrejhocahost lserN nan. a | 
一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
| 第 二 步 : 填写 用 户 信息 
国人 
于 好 名 黎 : | yi_ixt 

D4: | Wm 


| 


(此 问题 将 在 修 进 失 密码 时 提示 修 辐 答 ) 


E> 

性 别 :| G 男 C 女 

出 生日 期 ;| [sns 到 后 [这 到 月 到 日 

工作 单位 :| 十 

固定 电话 : | 0731-88838883 

移动 电话 : | | 加 )1306838889 

通 席 址 :| 两 两 攻 汪 二 基本 可 

到 :| 1015 

| 
加 
[BE [| 于 有 aas 4 
图 8.29 页 面 预览 效果 


单 击 【确认 】 按 钮 ， 可 进入 下 一 步 操作 : 确认 信息 。 但 是 ， 当 用 户 信息 输入 不 完全 ， 
或 输入 不 规范 而 导致 页 面 无 法 通过 验证 时 ， 系 统 将 会 自动 显示 错误 信息 ， 而 无 法 跳 过 当前 
操作 ， 如 图 8.30 所 示 。 
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soft Internet Explorer 


| 证- 国 团 全 | 辐 收 京 各 其 仁 却 
地 二 (0) 峰 ntpyyacahostusertogn aspx 了 可 ON || 凶 扩 
| 


入 可 用 户 名 | 格式 洁 is+ 


[a 
(此 问题 格 在 你 丫 失 密码 时 提示 您 固 答 ) 请 辆 入 提示 问题 4 
请 铺 入 问题 和 案 ? 
邮箱 地 址 : | [sdfisdf 请 输入 正 更 4 条 地 址 4 
人 个 人 资料 ( 选 寺 内 容 ? 
真实 验 名 : | [dddd 


性 别 :| @G 男 C 女 
出 生日 期 : [1920 到 年 1 到 A [1 司 昌 
工作 单位 : | |dd 

固定 电话 : 
移动 电话 : 
通讯 地 址 
邮政 六 码 : 


sdfsadfsd 


8.30 ”页 面 预览 一 -输入 错误 


8.2.3 ”确认 信息 


接 下 来 ， 介 绍 用 户 注册 中 的 第 3 步 操 作 ， 即 确认 信息 。 在 此 步 操 作 中 ， 主 要 是 显示 用 
户 所 填写 的 个 人 资料 以 供用 户 确认 。 

在 了 D 为 Step3 的 Panel 控件 中 ， 添 加 一 个 表格 ， 并 插入 各 种 相关 的 文本 标签 控件 ， 如 
图 8.31 所 示 。 


vo 管理 oonaspx (ATM 
命 人 (QO 站 点 (G 全 DGO 各 有 


辣 久 台 | 咖 - 员 


[asP:LANEL] [LblLoginiane] 
[Asp:LABEL] [Lblpwi] 
[ASP:LABEL] [LblQuestion] 
[ASP:LABEL] [Lbliansver] 
名 条 地 址 ，| [ASP:LABEL] [LblEma:1] 
[ASP:LAPEL] [LblNane] 
lblsex] 
[bl3irtH] 
[biork] 


中 | 


[rbirel] 
[blreli] 
[Dblaedr] 
lrhirip] 


碌 老 | 下 | ee 


[LblEr] 


ooopooo 


.31 ”确认 信息 功能 界面 
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在 图 中 ,用 文字 标记 了 各 个 标签 控件 所 对 应 的 ID 名 称 。 对 于 除了 ID 为 LblErr 的 标签 


以 外 的 各 个 标签 控件 的 显示 文本 ， 已 经 在 上 一 步 操作 中 的 【确认 】 按 钮 的 单 击 事件 中 
了 赋值 。 因 此 ， 这 里 只 需要 进行 显示 即 可 。 


进行 


标签 控件 LblErr 主要 用 于 显示 错误 信息 。 当 单 击 【确定 】 按 钮 时 ， 需 要 对 用 户 输入 的 
登录 名 称 进 行 判断 。 如 果 该 名 称 在 数据 库 中 已 经 存在 , 则 可 在 标签 LblErr 中 显示 相关 信息 


提示 无 法 保存 ， 并 取消 对 数据 库 的 插入 操作 。 


信息 ， 


这 里 的 【确定 】 按 钮 也 是 整个 页 面 中 惟一 与 数据 库 进行 交互 操作 的 按钮 ， 其 操作 主要 
分 为 两 步 。 第 一 步 将 用 户 所 填写 的 个 人 资料 信息 保存 至 数据 库 中 ;第 二 步 发 送 电子 邮件 至 


用 户 注册 时 所 指定 的 邮箱 地 址 中 。 
下 面 来 看 一 下 【确定 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 
【示例 代码 】 
Sub Sure2 _Click (Sender As Object,E As EventArgs) 
' 定 义 数据 库 连接 


Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim Dr As OleDbDataReader 

Dim StrCnn Rs String 

Dim StrSql Rs String 

Dim Strl Rs String 

"获取 数据 库 的 连接 字符 串 

StrCnn = System.Configuration.ConfigurationSettings .AppSettings (" 
MM CONNECTION STRING Cnn") 

"判断 登录 名 称 是 否 重复 


StrSql="Select * from usersheet where loginname='" + thename .text .tostring 


+ mm 


Cnn=new OleDBConnection (StrCnn) 

Cnn.open () 

Cmd = New OleDbCcommand (StrSq1， Cnn) 

Dr=Cmd .ExecuteReader 

if Dr.read() then 
' 存 在 相同 的 登录 名 称 ， 提 示 信 息 ， 且 不 进行 任何 操作 
lblerr .text=" 该 用 户 名 已 被 占用 ， 数 据 无 法 保存 !" 
Cnn.close() 

elags 
Dr.close() 
"不 存在 相同 的 登录 名 称 ， 保 存 数 据 ， 并 发 送 电子 邮件 
"定义 插入 数据 的 seL 语句 
Strsql="insert into usersheet (loginname,UserName,UserPass,Birth, 
PassQuestion,PassAnswer,Address, Tell, Tel2, Works, ZipCode, Email)" 
Strsql=strsql + " Values(" 
StrSql = StrSql + "'" + theName.Text.ToString + "~'," 
StrSql=StrSql + "'" + username.text.tostring + "'," 
StrSql=StrSgl + ™" + TblPwd.text + ""," 
StrSdql=StrSql + "'" + cdate(dyear.selecteditem.text.tostring+"—" 
dmonth.selecteditem.text.tostring + "-" + 
dday.selecteditem.text.tostring) + "vv 
StrSql=StrSql + "'" + sex.selecteditem.text.tostring + "'," 


Sex, 
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Strsql=strsql 
StrSsql=Sstrsql 
Strsql=strsql 
Strsql=Sstrsql 
StrSsql=StrSsql 


question.text.tostring + "™', 
answer.text.tostring + "'," 


全 addr.text.tostring + "" 


tell.text.tostring + " 
tel2.text.tostring + " 
Strsql=Strsql job.text.tostring + 
Strsql=Strsql zip.tezxt.tostring + "'," 
StrSql=StrSql + "'" + email.text.tostring + "™')" 
Cmd=new OleDBCommand (strSdql, cnn) 

' 执 行 插入 数据 操作 

Cmd .ExecuteNonQuery () 

Cnn.Close() 

"定义 smtpclient 类 ， 该 类 用 来 实现 将 电子 邮件 发 送 到 SMTP 服务 器 
Dim Client As System.Net.Mail.SmtpClient = New 


+ 二 十 十 十 十 十 
++++++ + 


SmtpClient ("smtp.sina.com.cn") 


' 将 UseDefaultcredentials 属性 设置 为 False， 该 属性 表示 是 否 发 送 系 统 凭据 
Client.UseDefaultCredentials = False 

"设置 用 于 验证 发 件 人 身份 的 凭据 ， 所 带 参数 中 前 者 为 发 件 人 的 邮箱 ， 后 者 为 邮箱 的 密码 
Client.Credentials = New System.Net.NetworkCredential( 

"hyh_ lxt@sina.com", "hlyxht") 

"指定 如 何 处 理 待 发 的 电子 邮件 

Client.DeliveryMethod = SmtpDeliveryMethod.Network 

"定义 MailMessage 类 的 实例 ， 该 实例 可 定义 使 用 smtpclient 类 进行 传输 的 电子 邮件 
Dim Message As System.Net.Mail.MailMessage = New MailMessage 
"设置 发 送 至 的 邮箱 地 址 

Dim ToAddr As New System.Net.Mail.MailAddress (email.text.tostring) 
' 设 置 发 送 邮 件 的 邮箱 地 址 

Dim FromAddr As New System.Net.Mail.MailAddress ("hyh lxt@sina.com") 
Message.To.Add (ToAddr) 

Message.From = FromAddr 


' 设 置 邮 件 主题 

Message.Subject = "账户 激活 邮件 " 

"设置 邮件 内 容 

Strl = "<div><b> 亲 爱 的 " & UserName .Text & ": </b></div>" 


Strl = Strl & "<div style='padding-left:30px;padding-top:30px;'> 本 站 点 
已 经 收 到 您 的 注册 信息 ， 请 激活 以 完成 您 的 账户 注册 。</qiv>" 

Strl = Strl & "<div style='padding-left:60px;padding-top:15px;'><a 
href="'http://localhost/user/active user.aspx?" 

Strl = Strl & "name=" & theName .Text & "' > 请 单 击 这 里 以 激活 您 的 账户 </a></div>" 
Strl = Strl & "<div style='padding-left:30px;padding-top:30px;'><hr> 


<small><font color=red> 此 邮件 由 本 站 点 系统 发 出 ， 请 勿 直接 回复 ! </font></small> 


</div>" 
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Message.Body = Strl 

' 设 置 邮件 的 编码 方式 

Message.BodyEncoding = ASCIIEncoding.GetEncoding ("gb2312") 
Message.SubjectEncoding = ASCIIEncoding.GetEncoding ("gb2312") 
Message.IsBodyHtml = True 

' 发 送 电 子 邮件 

Client.SsSend (Message) 

stepl.Visible = False ' 隐 藏 第 1 步 操作 界面 

step2.visible=false “' 隐 藏 第 2 步 操作 界面 
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step3.visible=false “' 隐 藏 第 3 步 操作 界面 
step4.Visible = True “显示 第 4 步 操作 界面 
end if 
End sub 


在 此 段 代 码 中 ， 必 须 注意 以 下 几 点 。 

Q@ 在 定义 插入 数据 的 SQL 语句 中 ， 所 插入 的 值 大 部 分 都 是 从 第 2 步 操作 ( 即 填写 个 
人 资料 ) 添 加 各 个 文本 框 或 下 拉 列 表 框 中 获得 ,但 登录 口令 一 项 例外 ， 它 是 从 确认 信息 中 用 
于 显示 登录 口令 的 文本 标签 控件 中 获得 。 这 是 因为 ， 对 于 密码 模式 下 的 文本 框 控 件 ， 一 旦 
数据 回 发 至 服务 器 之 后 (比如 说 在 单 击 “ 填 写 个 人 资料 ”步骤 中 的 【确认 】 按 钮 之 后 )， 其 
文本 框 中 的 数据 便 会 清空 ， 而 不 会 保留 (这 也 是 出 于 一 种 安全 考虑 )。 也 就 是 说 ， 在 单 击 本 
步骤 中 的 【确定 】 按 钮 时 ， 登 录 口 令 对 应 的 文本 框 thePass 的 值 已 经 被 清空 ， 因 此 只 能 从 确 
认 信 息 中 表示 登录 口令 的 标签 控件 LblPwd 中 获取 用 户 所 输入 的 登录 口令 。 

@ ”对 于 电子 邮件 的 自动 发 送 ， 采 用 了 在 ASPNET 2.0 中 新 增 的 SmtpClient 类 。 该 类 
允许 应 用 程序 使 用 Smtp 协议 (简单 邮件 传输 协议 ) 来 发 送 电 子 邮 件 。 与 ASP.NET 1.0 中 的 
SmtpMail 类 相 比 ， 该 类 提供 了 更 为 简单 、 快 捷 的 方法 来 发 送 电 子 邮 件 。 对 于 SmtpClient 类 
的 使 用 ， 这 里 不 再 做 详细 的 叙述 ， 其 具体 属性 和 方法 的 含义 可 参考 相关 的 MSDN 文档 。 

@ 为 了 确保 代码 的 正常 运行 ， 还 必须 在 页 首 导 入 以 上 代码 所 用 到 的 命名 空间 ， 包 括 
System.Data、System.Data.OleDb 和 System.Net.Mail， 这 是 千 万 不 可 忽略 的 。 其 中 ， 前 两 个 
提供 在 代码 中 与 数据 库 进 行 连接 所 必需 的 类 ， 后 者 则 是 提供 发 送 电 子 邮 件 所 必需 的 类 ， 如 
图 8.32 所 示 。 


<DEPageBind runat= "server ”PostBackBind= "true™ /7S 

nport NaneSpace=" Systen. Data” % 
<%@ Import NaneSpace="Systen.Data.0leDb”%>| 导入 命名 空间 
<%@_ Import Nanespace=" System Net. Mail” %> 


《IDOCTYPE htnl PUBLIC “-//¥3C//DID XHTIL 1.0 Transitional//EN" 
图 8.32 导入 命名 空间 


【返回 】 按 钮 的 作用 是 ， 当 用 户 在 确认 信息 中 发 现 自己 的 输入 有 误 时 ， 可 通过 此 按钮 
返回 前 一 页 面 进行 数据 的 修改 。 单 击 【 返 回 】 按钮 , 将 触发 事件 Return_Click, 其 代码 如 下 : 

【示例 代码 】 

Sub Return Click(Sender As Object,E As EventArgs) 

stepl.visible = False ' 隐 藏 第 1 步 操作 界面 
step2.Visible = True ' 显 示 第 2 步 操作 界面 
step3.Visible = False ' 隐 藏 第 3 步 操作 界面 
step4.visible = False ' 隐 藏 第 4 步 操作 界面 

End Sub 

至 此 ， 用 户 注 册 的 第 3 步 操作 设计 完成 ， 预 览 界面 如 图 8.33 所 示 。 

在 页 面 预览 中 ， 可 能 还 会 存在 一 个 小 问题 。 那 就 是 ， 前 面 所 输入 的 中 文 可 能 无 法 正常 
显示 ， 而 是 显示 为 “????”， 这 是 由 于 ASPNET 不 支持 编码 gb2312 传输 所 导致 的 。 解 决 
办 法 很 简单 :切换 至 【代码 】 视 图 ， 将 页 首 第 一 句 话 中 的 “ResponseEncoding-"gb2312"” 
去 掉 即 可 ， 如 图 8.34 所 示 。 
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8.33 ”页 面 预览 


NO Page Laneuase= WH” Contentiype= text/htnl” (ResponseEncodine= ED23 TY 
<W@ Register TagPrefix="IO” Namespace="DreamnweaverCtrls” Assembly= 删除 
|“DreanweaverCtrls, version=1.0.0.0,publicKeyToken=836f606ede05d46a, culture=neutral” %> 


> 


图 8.34 修改 代码 
8.2.4 注册 成 功 


接 下 来 介绍 用 户 注 册 中 的 第 4 步 操 作 ， 即 注册 成 功 。 事 实 上 ， 在 此 步 操作 之 前 ， 所 有 
的 功能 操作 均 已 完成 ， 这 里 仅仅 是 显示 注册 成 功 的 相关 信息 。 

在 了 D 为 Step4 的 Panel 控件 中 ， 添 加 一 个 表格 ， 并 插入 注册 成 功 的 相关 提示 信息 ， 如 
图 8.35 所 示 。 


ND)\book\e 吕 兴 理 \login.asp (HTMU] 


EE 
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ET 


| 立 Ep 点 击 邮 什 中 的 “请 点 击 这 旦 击 洲 活 多 的 隆 户 ”六 油 笑 所 出 语 的 账户 。 第 四 步 操 作 


图 8.35 注册 成 功 界 面 设计 
在 注册 成 功 信息 中 ， 将 提示 用 户 “ 账 户 激活 邮件 ”已 经 发 送 至 其 注册 的 邮箱 中 ， 并 提 
醒 用 户 必须 收取 邮件 并 单 击 邮件 中 的 链接 来 激活 账户 ， 否 则 将 无 法 正常 登录 。 这 里 ， 通 过 
一 个 动态 文本 <%=email.Text %> 来 获取 并 显示 用 户 注册 时 所 填写 的 邮箱 地 址 。 
此 步 操 作 的 页 面 预 览 如 图 8.36 所 示 。 
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图 8.36 页 面 预览 


至 此 , Login.aspx 页 面 全 部 制作 完成 。 而 用 户 注册 的 最 后 一 步 操作 一 一 激活 账户 将 通过 
页 面 Active_User.aspx 来 完成 。 


8.2.5 激活 账户 


激活 账户 是 用 户 注册 功能 中 的 最 后 一 步 操作 ， 其 主要 目的 是 验证 用 户 邮箱 的 正确 性 ， 
以 防 恶意 注册 。 

所 谓 激活 账户 ， 其 原理 是 将 数据 库 中 指定 用 户 所 对 应 的 字段 JHTag 的 值 设 置 为 1。 因 
此 ， 页 面 设计 的 基本 思路 是 : 根据 页 面 传递 的 参数 更 新 数据 库 ,然后 显示 相应 的 提示 信息 ， 
表示 账户 已 经 激活 ， 并 提供 登录 站 点 的 链接 按钮 。 

打开 用 户 注册 时 所 填写 的 邮箱 ， 可 查收 到 前 面 所 发 送 的 主题 为 “账户 激活 邮件 ”的 电 
子 邮件 ， 如 图 8.37 所 示 。 
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图 8.37 ” 收 到 的 电子 邮件 


在 此 邮件 中 ， 提 供 了 用 于 激活 账户 的 链接 ， 其 链接 地 址 为 : http://localhost/user/active_ 
user.aspx?name=hyh。 页 面 Active_User.aspx 用 于 实现 激活 账户 的 功能 ， 其 所 带 参数 name 
表示 所 要 激活 账户 的 会 员 的 登录 名 称 。 一 般 来 说 ， 在 正式 应 用 中 ， 所 传递 的 参数 值 (如 这 里 
的 hyb) 是 需要 进行 加 密 的 ， 而 不 会 采用 明文 方式 。 这 里 仅 介绍 功能 的 实现 ， 因 此 没有 考虑 
加 密 的 问题 。 该 激活 页 面 的 具体 实现 如 下 。 
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1. 设计 页 面 的 基本 框架 

为 了 防止 用 户 恶意 激 活 不 存在 的 账户 ， 可 以 添加 一 个 容器 控件 PlaceHolder， 将 要 显示 
的 信息 包含 在 其 中 。 当 指定 的 账户 不 存在 时 ， 则 隐藏 该 容器 ， 包 括 该 容器 内 的 所 有 文本 或 
控件 ， 此 时 页 面 将 无 任何 显示 。 当 指定 的 账户 存在 并 执行 了 激活 操作 时 ， 页 面 上 的 提示 信 
息 才 真正 显示 出 来 。 

(1) 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 国 按 钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 选 
择 【ASP.NET 标签 】|【Web 服务 器 】 分 类 ， 并 在 右边 的 列表 框 中 选择 asp:PlaceHolder。 单 
击 【 插 入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 设 置 控 件 ID 为 PlaceHolderl， 并 取 
消 【 可 见 】 复 选 框 的 选择 ， 如 图 8.38 所 示 。 


标签 篇 辑 回 - PlaceHolder 


Placelolder - 第 规 


JD: Flecenolderl 


8.38 添加 PlaceHolder 控件 


(2) 将 光标 置 于 控件 PlaceHolderl 之 内 ， 并 在 其 中 添加 所 要 显示 的 相关 文本 信息 ， 如 
8.39 所 示 。 


计 | 标题 用户 注 出 


图 8.39 添加 文本 
(3) 为 了 在 文本 “亲爱 的 ”后 面 显 示 激 活用 户 的 真实 名 称 ， 这 里 需要 创建 一 个 数据 集 。 
打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 在 弹出 的 菜单 
中 选择 【数据 集 】 命 令 ， 将 弹出 【数据 集 】 对 话 框 ， 如 图 8.40 所 示 。 
(4) 设置 数据 集 的 名 称 为 DataSet1， 选 择 连接 Cnn， 选 择 数据 表格 UserSheet， 在 筛选 
条 件 中 设置 为 字段 LoginName 等 于 URL 参数 Name。 单 击 【 确 定 】 按 钮 ， 完 成 设置 。 
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8.40 ”添加 数据 集 


(5) 在 【应 用 程序 】 面 板 组 中 ， 将 选项 切换 至 【 绑 定 】 
面板 ， 展 开 刚 才 创 建 的 数据 集 DataSetl ， 如 图 8.41 所 示 。 

选择 字段 UserName， 并 将 其 拖 至 设计 窗口 中 的 文本 “ 亲 
爱 的 ”后 面 。 这 样 ， 创 建 了 一 个 绑 定 文本 ， 该 文本 将 显示 当 
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前 激活 用 户 的 真实 名 称 。 了 coas 
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2. 创建 一 个 指向 登录 页 面 的 链接 


接 下 来 ， 在 提示 文本 的 下 方 创建 一 个 指向 登录 页 面 的 
链接 。 

(1) 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 国 按 钮 ， 在 弹出 
的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASPNET 标签 】|【Web 
服务 器 】 分 类 ， 并 在 右边 的 列表 框 中 选择 asp:HyperLink。 

(2) 单 击 【插入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 图 8.41 【 绑 定 】 面 板 
框 中 ， 设 置 该 HyperLink 控件 的 ID 为 Link1， 导 航 URL 为 
Default.aspx ( 即 登录 页 面 )， 目 标 选 择 _self( 即 在 本 窗口 中 打开 新 链接 ), 文本 设置 为 “登录 站 
点 ”， 如 图 8.42 所 示 。 


站 


8.42 添加 HyperLink 控件 


(3) 在 【布局 】 分 类 中 ， 设 置 其 前 景 颜 色 为 红色 :并 在 【样式 信息 】 分 类 中 ， 设 置 粗 
体 显示 。 
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下 面 ， 切 换 至 【代码 】 视 图 ， 在 Page_Load 事件 中 添加 以 下 代码 : 
【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventRrgs) 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim StrSql Rs String 
If (Not Page.IsPostBack) Then 
"获取 数据 集 Dataset1 的 记录 数 ， 判 断 要 激活 的 用 户 是 否 存在 
IE DataSetl.defaultView.Table.Rows .Count>0 Then 
"存在 要 激活 的 用 户 ， 执 行 更 新 操作 ， 并 显示 PlaceHolder 控件 
StrCnn = System.Configuration.ConfigurationSettings.ApPSettings (" 
MM _ CONNECTION STRING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
Cnn.open () 
"执行 更 新 语句 
Strsql = "update usersheet set jhtag='1' where loginname='" & 
Trim(Request .Querystring ("name")) & "'" 
Cmd = New OleDbCommand (strsql, Cnn) 
Cmd.ExecuteNonQuery () 
Cnn.close() 
' 显 示 PlaceHolder 控件 
PlaceHolderl .visible=true 
else 
' 不 存在 要 激活 的 用 户 ， 隐 藏 PlaceHolder 控件 
PlaceHolderl .visible=false 
End If 
End If 
End Sub 


根据 数据 集 DataSetl 所 筛选 的 结果 , 可 以 得 知 当前 要 激活 的 用 户 是 否 存在 。 如 果 存 在 ， 
则 执行 激活 操作 ， 并 显示 相关 信息 。 如 果 不 存 在 ， 则 隐藏 信息 的 显示 。 


提示 : 此 页 面 需 导入 命名 空间 System.Data 和 System.Data.OleDb。 
至 此 ， 用 户 激 活页 面 的 制作 全 部 完成 ， 页 面 预览 效果 如 图 8.43 所 示 。 
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8.3 用 户 登 录 


8.3.1 登录 站 点 


登录 站 点 是 会 员 管理 中 的 一 个 基本 功能 ， 它 允许 用 户 通 过 注册 的 登录 名 称 和 登录 密码 
进入 站 点 。 在 本 系统 中 ， 由 于 提供 了 账户 激活 功能 ， 因 此 在 检测 用 户 名 和 密码 是 否 正确 的 
同时 ， 还 需 判断 该 账户 是 否 已 被 激活 ; 否则， 是 不 能 正常 登录 的 。 

下 面 ， 来 看 一 下 登录 页 面 的 具体 实现 。 

对 于 页 面 的 界面 设计 ， 这 里 不 做 过 多 的 叙述 ， 图 8.44 所 示 的 是 该 页 面 的 基本 界面 。 

(1) 在 界面 中 插入 两 个 文本 框 控件 theName 和 thePwd, 它们 分 别 对 应 于 登录 名 称 和 登 
录 密 码 的 输入 。 其 中 ， 文 本 框 thePwd 的 文本 模式 为 密码 。 
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图 8.44 界面 设计 
(2) 添加 三 个 按钮 控件 ， 其 文本 分 别 设置 为 “登录 ”、“ 立 即 注册 ”和 “忘记 密码 ”， 
对 应 的 ID 分 别 为 Login、Reg 和 FindPass， 按钮 的 单 击 事件 分 别 为 Login_Click、Reg_Click 


和 FindPass_Click。 

为 了 显示 错误 信息 ， 还 需要 在 界面 上 插入 一 个 标签 控件 LblEr。 该 控件 用 于 显示 当 登 
录 名 称 或 密码 错误 ， 或 者 此 账号 尚未 被 激活 时 的 相关 错误 信息 。 

(3) 在 登录 页 面 中 ， 登 录 名 称 和 登录 密码 是 必须 输入 的 。 因 此 ， 还 需要 在 两 个 文本 框 
之 后 分 别 添加 RequiredFieldValidator 控件 (必须 输入 验证 控件 )， 其 属性 设置 分 别 如 图 8.45 
和 图 8.46 所 示 。 

验证 控件 Requirel 用 于 对 登录 名 称 的 输入 进行 验证 ， 而 Require2 则 用 于 对 登录 密码 的 
输入 进行 验证 。 为 了 避免 当 用 户 单 击 【立即 注册 】 按 钮 和 【忘记 密码 】 按 钮 时 ， 由 于 页 面 
验证 失败 而 无 法 执行 正常 的 操作 , 这 里 需要 将 按钮 控件 Reg 和 FindPass 的 CausesValidation 
属性 ( 即 取消 选择 标签 编辑 器 中 的 【原因 确认 】 复 选 框 ) 设 置 为 False。 
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图 8.45 添加 RequiredFieldValidator 控件 Require1 


图 8.46 添加 RequiredFieldValidator 控件 Require2 


界面 设计 基本 完成 ， 接 下 来 看 一 下 具体 功能 的 实现 。 为 了 判断 用 户 的 输入 是 否 正确 ， 
这 里 需要 创建 一 个 数据 集 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 画 按钮 ， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 ， 此 时 将 弹出 【数据 集 】 对 话 框 ， 如 图 8.47 所 示 。 


图 8.47 【数据 集 】 对 话 框 
(2) 设置 数据 集 名 称 为 DataSet1， 数 据 库 连接 选择 Cnn， 在 表格 下 拉 列 表 框 中 选择 
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UserSheet， 同 时 设置 筛选 条 件 为 字段 LoginName 等 于 表单 变量 theName。 同 时 ， 还 需要 添 
加 一 个 筛选 条 件 ， 以 判断 密码 的 正确 性 。 

(3) 单 击 【高 级 】 按 钮 ， 在 弹出 的 对 话 框 中 单 击 参数 右 侧 的 轩 j 按 钮 ， 添 加 一 个 新 的 参 
数 。 此 时 ， 将 弹出 【添加 参数 】 对 话 框 ， 如 图 8.48 所 示 。 


图 8.48 【添加 参数 】 对 话 框 


(4) 输入 参数 名 称 “@thePass”， 在 参数 类 型 中 选择 VarChar， 参 数 的 值 可 通过 单 击 
Build 按钮 来 创建 ， 如 图 8.49 所 示 。 


图 8.49 【生成 值 】 对话 框 


(5) 单 击 【 确 定 】 按 钮 ， 完 成 参数 的 创建 。 返 回 【 数 据 集 】 对 话 框 的 高 级 模式 ， 在 所 
显示 的 SQL 文本 框 中 添加 一 个 条 件 表达 式 以 判断 密码 是 否 正 确 ， 如 图 8.50 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 当 用 户 输 入 登录 名 称 和 登录 密码 并 单 击 【 登 
录 】 按 钮 时 ， 根 据 数 据 集中 的 记录 是 否 为 空 ， 可 以 判断 用 户 所 输入 的 用 户 名 及 密码 是 否 
正确 。 
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图 8.50 【数据 集 】 对 话 框 的 高 级 模式 


(6) 切换 至 【代码 】 视 图 ， 添 加 各 个 按钮 的 单 击 事件 ， 代 码 如 下 : 
【示例 代码 】 


<script runat="server"> 


ie 
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"添加 按钮 “登录 ”的 单 击 事件 
Sub Login Click(BYVal sender As Object，ByVal E Rs EventArgs) 
"定义 变量 JHStr， 用 于 存储 账户 是 否 激活 标志 
dim JHStr as String 
' 判 断 数据 集 Dataset1 中 的 记录 是 否 为 空 
If DataSetl.DefaultView.Table.Rows.Count>0 then 
' 数 据 集 Dataset1 中 存在 记录 ， 说 明 用 户 名 称 及 密码 正确 ， 但 仍 需要 判断 其 账户 是 否 激活 
"获取 数据 集 DataSetl 中 的 第 一 条 记录 (一 般 来 说 ， 只 可 能 有 一 条 记录 ) 的 字段 JHTag 的 值 
JHStr=DataSet1.DefaultView.Table.Rows (0) ("JHTag") 
IE trim(JHStr)="1" Then 
"该 账户 已 经 激活 ， 可 正常 登录 
"将 其 用 户 编号 、 用 户 名 称 以 及 当前 登录 时 间 存 储 至 session 变量 中 


Session("userid") = DataSet1.DefaultView.Table.Rows (0) ("code") 
Session ("username") = DataSet1.DefaultView.Table.Rows (0) ("username") 
Session("logintime") = System.DateTime .Now 
' 页 面 跳 转 至 登录 后 的 主页 面 
Response.Redirect ("main.aspx") 

else 


"JHStr 的 值 为 0， 说 明 该 账户 尚未 激活 ， 提 示 错 误 信息 
LblErr.Text = "此 账户 尚未 激活 ， 无 法 正常 登录 ! " 
end if 
else 
"数据 集 Dataset1 中 的 记录 为 空 ， 无 筛选 结果 ， 提 示 名 称 或 密码 错误 
LblErr.Text = "登录 名 称 或 密码 错误 ! " 
end if 
End Sub 
， 添加 【忘记 密码 】 按 钮 的 单 击 事件 
Sub FindPass Click(ByVal sender Rs Object, ByVal E As EventArgs) 
"将 页 面 跳 转 至 找 回 密码 页 面 LoadPass .aspx 
Response.Redirect ("LoadPass.aspx") 
End Sub 
' 添 加 【立即 注册 】 按 钮 的 单 击 事件 
Sub Reg Click(ByVal sender As Object, ByVal E As EventArgs) 
"将 页 面 跳 转 至 用 户 注册 页 面 Login .aspx 
Response.Redirect ("Login.aspx") 
End Sub 
</script> 


在 【登录 】 按 钮 的 单 击 事件 中 ， 首 先 根据 数据 集 DataSetl 的 记录 数 ， 判 断 是 否 存在 与 


用 户 所 输入 的 登录 名 称 和 登录 密码 相 匹配 的 用 户 信息 。 如 果 记 录 数 为 0， 则 表示 不 存在 匹 


配 的 信息 ， 提 示 用 户 名 或 密码 错误 。 如 果 记 录 数 大 于 0， 则 说 明 用 户 所 输入 的 登录 名 称 和 
密码 正确 ; 但 此 时 仍 需 根据 匹配 记录 中 的 字段 JHTag 的 值 来 判断 该 账号 是 否 已 激活 。 当 
JHTag 的 值 为 0 时 ， 表 示 账 号 尚未 被 激活 。 当 JHTag 的 值 为 1 时 ， 表 示 账 号 已 被 激活 ， 这 


时 上 


户 可 以 正常 登录 。 为 了 在 后 续 的 页 面 中 验证 用 户 的 合法 身份 ， 这 里 创建 了 三 个 Session 


变量 : UserID( 用 户 编号 )、UserName( 用 户 名 称 ) 和 LoginTime( 登 录 时 间 )， 并 将 页 面 跳 转 至 
站 点 的 主页 面 Main.aspx。 


对 于 【立即 注册 】 按 钮 和 【忘记 密码 】 按 钮 的 单 击 事件 ， 其 操作 均 相 当 简 单 ， 直 接 将 


页 面 跳 转 到 相应 的 操作 页 面 即 可 。 
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至 此 ， 页 面 功 能 设计 完成 ， 界 面 预览 如 图 8.51 所 示 。 
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图 8.51 页 面 预览 
8.3.2 主页 面 


用 户 登录 成 功 后 ， 即 可 进入 站 点 的 主页 面 。 在 实际 应 用 中 ， 不 同 的 站 点 其 主页 面 的 内 
容 是 完全 不 同 的 。 在 本 例 中 ， 主 页 面 仅仅 是 提示 用 户 已 成 功 登 录 站 点 ， 并 提供 注销 登录 的 
链接 和 修改 个 人 信息 的 链接 。 

此 外 , 有 些 用 户 可 能 在 未 登录 的 情况 下 直接 在 地 址 栏 中 输入 主页 面 的 地 址 来 进行 访问 。 
此 时 ， 出 于 安全 考虑 ， 需 要 对 其 进行 判断 ， 当 用 户 尚未 登录 时 ， 应 给 出 相应 提示 ， 并 提供 
登录 页 面 的 相应 链接 。 

综 上 考虑 ， 在 主页 面 中 需要 添加 一 个 标签 控件 和 三 个 按钮 控件 ， 如 图 8.52 所 示 。 
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图 8.52 主页 面 设计 
在 此 页 面 中 ， 标 签 控 件 LblInfo 用 于 显示 提示 信息 ，LogOut( 注 销 用 户 ) 按 钮 用 于 执行 注 


销 功能 ，LogIn( 登 录 ) 按 钮 用 于 将 页 面 链接 至 登录 页 面 ，ModiUser( 修 改 资料 ) 按 钮 则 用 于 将 
页 面 链接 至 修改 信息 页 面 。 但 是 ， 在 同一 时 间 ， 三 个 按钮 不 可 能 同时 显示 。 当 用 户 为 合法 
户 ( 即 通过 登录 后 进入 此 页 面 ) 时 ， 仅 显示 LogOnut 按钮 和 ModiUser 按钮 。 当 用 户 为 非法 


Sal 
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用 


户 ( 即 未 通过 登录 而 直接 访问 此 页 面 ) 时 ， 仅 显示 LogIn 按钮 。 当 用 户 通过 单 击 LogOnut 按 


钮 执行 注销 功能 后 ， 仅 显示 LogIn 按钮 ， 且 其 按钮 文本 将 变 为 “重新 登录 ”。 对 于 以 上 三 
种 情况 ， 标 签 控件 LblInfo 均 将 显示 不 同 的 文本 信息 。 这 些 ， 均 由 代码 来 实现 。 


下 面 ， 介 绍 代码 的 具体 实现 。 
切换 至 【代码 】 视 图 ， 添 加 Page_ Load 事件 以 及 各 按钮 的 单 击 事件 ， 代 码 如 下 : 
【示例 代码 】 


<script runat="server"> 
' 添 加 页 面 加 载 时 执行 的 Page_Load 事件 
Sub Page Load(ByVal Sender As Object, ByVal e Rs EventRrgs) 
If Not Page.IsPostBack Then 
"判断 Session 变量 是 否 为 空 ， 并 以 此 判断 用 户 是 否 已 经 登录 系统 
If IsDBNull (Session("userid")) Or Trim(Session("userid")) = "" Then 
"Session 变量 为 空 ， 说 明 用 户 为 非法 用 户 
LblInfo.Text = "对 不 起 ， 您 尚未 登录 系统 ! " 
Logout .Visible = False ' 隐 藏 【注销 用 户 】 按 钮 
ModiUser.Visible = False ' 隐 藏 【修改 资料 】 按 钮 
LogIn.Visible = True ' 显 示 【 登 录 】 按钮 
Else 
"session 变量 不 为 空 ， 说 明 用 户 为 合法 用 户 
' 通 过 session 变量 username， 来 获取 当前 登录 的 用 户 名 称 
LblInfo.Text = "恭喜 ，"”& Trim(Session("username")) & "， 您 已 成 功 登 录 系 
统 !" 
Logout .Visible = True "显示 【注销 用 户 】 按 钮 
ModiUser.Visible = True “显示 【修改 资料 】 按 钮 
LogIn.Visible = False "隐藏 【登录 】 按 钮 
End If 
End If 
End Sub 
' 添 加 【注销 用 户 】 按 钮 的 单 击 事件 
Sub LogOut Click(ByVal sender As Object, ByVal E As EventArgs) 
' 清 空 Session 变量 
Session("userid") = "" 
Session("username") = "" 
Session("logintime") = "" 
' 提 示 注 销 成 功 
LblInfo.Text = "用 户 注销 成 功 ， 您 可 安全 关闭 此 页 面 ， 也 可 重新 登录 ! " 
"将 【登录 】 按 钮 的 显示 文本 改 为 【重新 登录 】 
LogIn.Text = "重新 登录 " 
Logout .Visible = False ”' 隐 藏 【注销 用 户 】 按 钮 
ModiUser.Visible = False ' 隐 藏 【修改 资料 】 按 钮 
LogIn.Visible = True "显示 【重新 登录 】 按 钮 
End Sub 
"添加 【和 登录】 按钮 的 单 击 事件 
Sub Login Click(ByVal sender As Object, ByVal E As EventArgs) 
' 页 面 跳 转 至 登录 页 面 Default .aspx 
Response.Redirect ("default .aspx") 
End Sub 
"添加 【修改 资料 】 按 钮 的 单 击 事件 


Sub Modi Click(ByVal sender As Object, ByVal E Rs EventArgs) 
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"页 面 跳 转 至 修改 信息 页 面 ModiUser -aspx 
Response.Redirect ("ModiUser.aspx") 
End sub 
</script> 


页 面 预 览 效果 如 图 8.53 所 示 。 
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图 8.53 页面 预览 效果 
单 击 【注销 用 户 】 按 钮 ， 页 面 效 果 如 图 8.54 所 示 。 
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图 8.54 注销 后 的 页 面 效果 
8.4 找 回 密码 


找 回 密码 是 会 员 管理 中 一 个 必 不 可 少 的 功能 。 对 于 用 户 来 说 ,如果 长 期 没有 登录 系统 ， 
很 可 能 会 忘记 自己 账号 的 密码 。 此 时 ， 则 可 通过 找 回 密码 功能 来 寻 回 自己 账号 的 密码 。 

并 不 是 任何 人 都 可 轻易 获取 账号 的 密码 ， 首 先 必须 提供 正确 的 账号 ， 然 后 输入 正确 的 
生日 并 正确 回答 密码 提示 问题 ， 才 能 通过 系统 获取 该 账号 的 密码 。 其 中 ， 生 日 信息 、 密 码 
提示 问题 以 及 提示 问题 的 答案 均 是 由 用 户 在 注册 时 所 设置 的 。 

首先 来 看 页 面 的 设计 ， 如 图 8.55 所 示 。 
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8.55 页 面 设计 


在 图 8.55 中 ， 用 文字 标记 了 各 ASPNET 控件 对 应 的 ID 名 称 。 页 面 中 ， 首 先 添加 了 三 


个 Panel 控件 ， 用 于 控制 找 回 密码 的 三 步 操作 的 界面 显示 和 隐藏 。 


在 控件 Panell 中 ， 提 供 了 找 回 密码 的 第 一 个 步骤 的 操作 界面 ， 即 用 户 名 称 的 输入 。 在 
用 于 输入 用 户 名 的 文本 框 控件 UserName 之 后 ， 添 加 了 一 个 标签 控件 LblErr 和 一 个 
RequiredFieldValidator 控件 Requirel 。 其 中 ， 标 签 控件 LblErr 用 于 显示 当 用 户 名 不 存在 时 
的 错误 信息 ， 而 RequiredFieldValidator 控件 Requirel 则 用 于 限制 文本 框 控 件 的 输入 值 不 能 


为 空 。 控 件 Requirel 的 属性 设置 如 图 8.56 所 示 。 


初始 状态 下 ， 仅 显示 Panell 控件 而 隐藏 Panel2 和 Panel3 控件 。 当 输入 | 


户 名 称 并 经 


Nextl 按钮 控件 中 的 代码 确认 该 名 称 存 在 时 ， 则 显示 Panel2 控件 ， 而 隐藏 Panell 控件 。 
在 Panel2 控件 中 ， 提 供 了 找 回 密码 的 第 二 个 步骤 的 操作 界面 ， 即 出 生日 期 以 及 密码 提 


示 问 题 答案 的 输入 。 在 Next2 按钮 控件 的 一 侧 , 添加 了 一 个 LblErrl 标签 控件 ， 
显示 当 出 生日 期 或 密码 提示 问题 的 答案 与 指定 用 户 名 的 信息 不 符 时 的 错误 信息 


"no 


该 控件 用 于 


当 用 户 在 Panel2 控件 中 输入 的 出 生日 期 与 密码 提示 问题 答案 通过 Next2 按钮 控件 中 的 


代码 验证 正确 时 ， 则 显示 Panel3 控件 ， 而 隐藏 Panel2 控件 。 


? 标 答 信 息 


Cu |] ww | 
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当 显 示 Panel3 控件 时 ， 说 明 用 户 经 过 验证 为 合法 用 户 ， 此 时 将 显示 用 户 的 密码 信息 ， 
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提示 用 户 妥 善 保管 好 自己 的 密码 ， 并 创建 目标 为 登录 页 面 的 链接 按钮 。 

为 了 判断 用 户 所 输入 的 用 户 名 是 否 存在 ， 以 及 用 户 所 输入 的 出 生日 期 及 密码 提示 问题 
的 答案 是 否 正确 ， 需 要 创建 一 个 数据 集 。 

打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 加 按钮 ， 在 弹出 的 菜单 
中 选择 【数据 集 】 命令 ， 在 打开 的 【数据 集 】 对 话 框 中 设置 数据 集 的 属性 ， 如 图 8.57 所 示 。 


中 


8.57 创建 数据 集 


数据 集 的 名 称 设 置 为 DataSet1， 连 接 选 择 Cnn， 表 格 选择 UserSheet， 筛 选 条 件 设 置 为 
字段 LoginName 等 于 表单 变量 UserName。 
下 面 ， 来 看 相关 事件 代码 的 实现 。 


【示例 代码 】 
<script runat="server"> 
' 定 义 共享 变量 
Shared theYear As String  ' 用 于 存储 指定 用 户 的 出 生日 期 的 年 
Shared theMonth As String ' 用 于 存储 指定 用 户 的 出 生日 期 的 月 
Shared theDay As String ' 用 于 存储 指定 用 户 的 出 生日 期 的 日 
Shared theAnswer As String ' 用 于 存储 指定 用 户 的 提示 问题 的 答案 信息 
' 初 始 化 页 面 加 载 事 件 
Sub Page Load(ByVal Sender As Object, ByVal E Rs EventArgs) 
"定义 数组 theYear， 用 于 绑 定年 所 对 应 的 下 拉 列 表 框 控件 Drop_Y 
Dim theYear As New ArrayList 
"定义 数组 theMonth， 用 于 绑 定 月 所 对 应 的 下 拉 列 表 框 控件 Drop_M 
Dim theMonth As New ArrayList 
"定义 数组 theDay， 用 于 绑 定 日 所 对 应 的 下 拉 列 表 框 控件 Drop_D 
Dim theDay As New ArrayList 
Dim i As Integer 
If (Not Page.IsPostBack) Then 
Panell.Visible = True ' 显 示 Panell 
Panel2.Visible = False ' 隐 藏 Panel12 
Panel3.Visible = False ' 隐 藏 Panel3 
' 添 加 年 度数 据 
For i = 1920 To 2006 
theYear.Add (i.Tostring()) 


Next 


"添加 月 份 数据 
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For i=1 To 12 
theMonth.Add (i.Tostring ()) 
Next 
"添加 日 数据 
For i=1 To 31 
theDay.Add (i.Tostring()) 
Next 
Drop Y.DataSource 
Drop Y.DataBind() 
Drop_M.DataSource = theMonth " 绑 定 下 拉 列 表 框 Drop M 
Drop M.DataBind() 
Drop_D.DataSource = theDay  ”“' 绑 定 下 拉 列 表 框 Drop_D 
Drop _D.DataBind() 
End If 
End Sub 
'Panell 中 【下 一 步 】 按 钮 的 单 击 事件 
Sub Nextl1 Click(Sender As Object,E As Eventargs) 
"判断 数据 集 筛选 结果 的 记录 数 是 否 大 于 0 
if DataSet1.DefaultView.Table.Rows .Count>0 then 
"数据 集 的 记录 数 大 于 0， 说 明 用 户 所 输入 的 用 户 名 称 存在 ， 数 据 集 所 返回 的 记录 为 指定 用 户 
的 相关 信息 
' 获 取 数 据 集中 的 出 生日 期 所 对 应 的 年 度 
theYear= Year (DataSetl .DefaultView.Table.Rows (0) ("Birth")) 
"获取 数据 集中 的 出 生日 期 所 对 应 的 月 份 
theMonth= Month (DataSetl .DefaultView.Table.Rows (0) ("Birth")) 
"获取 数据 集中 的 出 生日 期 所 对 应 的 日 
theDay= Day(DataSet1.DefaultView.Table.Rows (0) ("Birth")) 
"获取 数据 集中 的 密码 提示 问题 信息 
Question.Text=DataSet1.DefaultView.Table.Rows (0) ("PassQuestion") 
' 获 取 数 据 集中 的 用 户 密码 
Pwd.Text=DataSetl .DefaultView.Table.Rows (0) ("UserPass") 
"获取 数据 集中 的 密码 提示 问题 答案 信息 
theaAnswer=DataSet1.DefaultView.Table.Rows (0) ("PassAnswer") 
Panell.Visible = False ' 隐 藏 Panell 


theYear “' 绑 定 下 拉 列 表 框 Drop_Y 


| 


Panel2.Visible = True ' 显 示 Pane12 
Panel3.Visible = False ' 隐 藏 Panel3 
Else 


"数据 集 的 记录 数 等 于 0， 说 明 用 户 所 输入 的 用 户 名 称 不 存在 ， 提 示 错 误 信息 
LblErr.Text = "无 此 用 户 ! " 
End If 
End Sub 
"Pane12 中 的 【下 一 步 】 按 钮 的 单 击 事件 
Sub Next2 Click(Sender As Object,E As Eventargs) 
' 判 断 用 户 所 选择 的 年 度 与 出 生日 期 中 的 年 是 否 一 致 
If Trim(theYear) <> Drop Y.SelectedItem.Text.ToString Then 
LblErrl .Text = "年 份 错误 ! " 
"判断 用 户 所 选择 的 月 份 与 出 生日 期 中 的 月 是 否 一 致 
ElseIf Trim(theMonth) <> Drop M.SelectedItem.Text.Tostring Then 
LILblErrl.Text = "月 份 错误 ! " 
"判断 用 户 所 选择 的 日 与 出 生日 期 中 的 日 是 否 一 致 


ElseIf Trim(theDay) <> Drop D.SelectedIitem.Text.ToString Then 
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LblErrl.Text = "日 期 错误 ! " 
"判断 用 户 所 输入 的 密码 提示 问题 答案 是 否 正确 
ElseIf trim(theAnswer)<>trim(Answer.Text) then 
LblErrl.Text = "提示 问题 答案 错误 ! " 
Else 
"输入 信息 正确 ， 显 示 下 一 步 操作 
Panell .Visible False ' 隐 藏 Panell 
Panel2.Visible False “隐藏 Pane12 
Panel3.Visible True “' 显 示 Pane13 
End If 
End Sub 
"【 返 回 登录 页 面 】 按 钮 的 单 击 事件 
Sub Next3 Click(Sender As Object,E Rs Eventargs) 
"页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
End Sub 
' 定 义 下 拉 列 表 框 Drop_M 的 OnselectedIndexchanged 事件 
Sub ChangeMonth (ByVal Sender As Object, ByVal E As EventArgs) 
"此 事件 用 于 根据 用 户 所 选择 的 年 度 和 月 份 来 确定 下 拉 列 表 框 Drop_D 中 的 数据 显示 
Dim Days As Integer() = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31} 
Dim i As Integer 
Dim theDay As New ArrayList 
If ((Convert.ToInt32 (Drop Y.SelectedItem.Text.ToString()) Mod 4) = 0 And 
(Convert .ToInt32 (Drop Y.SelectedItem.Text.ToString()) Mod 100) <> 0) 
Then 
"当前 年 度 为 头 年 ， 将 2 月 份 所 对 应 的 天 数 改 为 29 天 
Days (1) = 29 
End If 
Fori=1 To Days (Convert .ToInt32 (Drop M.SelectedItem.Text.Tostring() 
= 
theDay.Add (i.Tostring) 
Next 
Drop_D.Datasource = theDay 
Drop_D.DataBind () 
End Sub 
</script> 


值得 一 提 的 是 , 当 单 击 Panel2 控件 中 的 下 一 步 ] 按 钮 时 ,不 可 再 次 通过 数据 集 DataSetl 
中 的 记录 来 获取 指定 用 户 的 相关 信息 。 这 是 因为 ， 数 据 集 DataSetl 所 设置 的 筛选 参数 为 表 
单 变量 UserName。 当 单 击 Panell 控件 中 的 【下 一 步 】 按 钮 提交 表单 数据 时 ， 表 单 变量 
UserName 是 存在 的 ( 即 用 户 名 称 所 对 应 的 文本 框 的 输入 值 ); 而 当 单 击 Panel2 中 的 【下 一 步 】 
按钮 提交 数据 时 ,所 提交 的 表单 将 不 再 包括 文本 框 控件 UserName， 因 此 此 时 将 无 法 通过 数 
据 集 来 获取 前 面 用户 所 输入 的 用 户 名 所 对 应 的 相关 信息 。 

为 了 解决 这 个 问题 ， 在 代码 中 定义 了 4 个 共享 变量 ， 分 别 用 于 存储 后 面 需要 进行 比较 
的 用 户 信息 ， 包 括 出 生日 期 中 的 年 、 月 、 日 以 及 密码 提示 问题 答案 等 。 当 单 击 Panell 控件 
中 的 【下 一 步 】 按 钮 时 ,获取 数据 集中 的 相关 信息 并 将 其 赋值 给 变量 。 这 样 , 在 单 击 Panel2 
控件 中 的 【下 一 步 】 按 钮 时 ， 则 无 须 再 次 从 数据 集中 获取 用 户 信息 ， 而 直接 将 用 户 的 输入 
与 相应 的 变量 值 进行 比较 即 可 。 
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页 面 预览 如 图 8.58 所 示 。 
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图 8.58 页面 预览 (1) 
输入 正确 的 用 户 名 ， 单 击 【 下 一 步 】 按 钮 ， 将 显示 第 二 步 操作 ， 如 图 8.59 所 示 。 
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图 8.59 页面 预览 (2) 
选择 正确 的 出 生日 期 ， 并 输入 正确 的 密码 提示 问题 答案 ， 单 击 【下 一 步 】 按 钮 ， 此 时 


将 会 显示 该 用 户 的 登录 密码 ， 如 图 8.60 所 示 。 
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8.60 ”页 面 预览 (3) 


至 此 ， 找 回 密码 的 功能 页 面 设计 完成 。 
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8.5 修改 信息 


当 已 注册 用 户 的 信息 发 生 改变 ， 如 电子 邮箱 发 生 改变 ， 或 想 修改 密码 提示 问题 的 答案 
等 ， 此 时 可 通过 单 击 主页 面 上 的 【修改 信息 】 链 接 来 进入 修改 信息 的 页 面 操作 ， 页 面 的 文 
件 名 为 ModiUser.aspx。 在 修改 信息 页 面 中 ， 人 允许 修改 除 登 录 名 称 和 登录 密码 之 外 的 所 有 
信息 。 

修改 信息 的 页 面 结构 与 用 户 注册 中 填写 个 人 资料 的 页 面 基本 类 似 ， 不 同 的 是 ， 在 修改 
信息 页 面 中 ， 首 先 必 须 获取 指定 用 户 的 相关 信息 ， 并 将 其 填充 至 相应 的 文本 框 控件 中 ， 以 
便 用 户 在 原 有 信息 的 基础 上 进行 修改 操作 。 

下 面 ， 来 看 页 面 的 表单 结构 ， 如 图 8.61 所 示 。 
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8.61 页面 设计 

在 图 中 , 添加 了 相应 的 文本 和 输入 框 控件 以 及 针对 部 分 文本 输入 框 的 验证 服务 器 控件 。 
由 于 页 面 的 基本 结构 与 填写 个 人 资料 的 功能 页 面 类 似 ， 这 里 不 做 过 多 的 说 明 。 为 了 在 页 面 
加 载 时 初始 化 数据 的 显示 ， 这 里 需要 创建 一 个 数据 集 。 

相应 【数据 集 】 对 话 框 的 设置 如 图 8.62 所 示 。 


图 8.62 创建 数据 集 
在 所 创建 的 数据 集 DataSetl 中 ， 设 置 筛选 条 件 为 字段 Code 的 值 等 于 阶段 变量 userid。 
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这 里 所 谓 的 阶段 变量 ， 就 是 在 登录 页 面 中 所 创建 的 Session 变量 。 通 过 此 数据 集 ， 可 获取 当 
前 登录 用 户 的 相关 信息 。 

在 创建 了 数据 集 之 后 ， 如 何在 页 面 加 载 时 将 其 信息 绑 定 到 相应 的 文本 框 控 件 中 ， 这 是 
在 创建 各 个 文本 框 控件 所 需要 注意 的 问题 。 下 面 ， 以 登录 名 称 对 应 的 文本 框 控件 为 例 来 介 
绍 如 何在 创建 文本 框 控件 的 同时 绑 定数 据 的 显示 。 

(1) 打开 【ASP.NET- 插 入 】 工 具 栏 ， 拖 动 【文本 框 】 控 件 友 至 相应 的 位 置 ， 此 时 将 
弹出 【asp: 文 本 框 】 对 话 框 ， 如 图 8.63 所 示 。 


8.63 ”添加 文本 框 控件 


(2) 输入 ID 名 称 为 theName， 然 后 单 击 副 按钮 ， 在 弹出 的 【动态 数据 】 对 话 框 中 选择 
数据 集 DataSetl ， 并 将 其 展开 ， 从 中 选择 字段 UserName， 如 图 8.64 所 示 。 

(3) 单 击 【确定 】 按 钮 ， 即 可 完成 动态 数据 的 绑 定 。 重 复 此 操作 ， 可 添加 其 他 文本 框 
控件 ， 并 同时 绑 定 初始 化 数据 的 显示 。 

这 里 ， 需 要 特别 提 到 的 是 出 生日 期 所 对 应 的 文本 框 控件 。 由 于 出 生日 期 在 数据 表 
UserSheet 中 所 对 应 的 字段 Birth 的 数据 类 型 为 日 期 /时 间 型 ， 如 果 按 以 上 的 操作 绑 定数 据 的 
显示 ， 则 在 文本 框 中 将 会 显示 完整 的 日 期 格式 ， 包 括 年 、 月 、 日 和 时 、 分 、 秒 。 而 对 于 用 
户 的 输入 来 说 ， 只 需要 年 、 月 、 日 即 可 。 此 时 ， 我 们 可 在 【动态 数据 】 对 话 框 中 设置 该 字 
段 所 绑 定 的 数据 的 显示 格式 为 【日 期 /时 间 一 2001-1-17】， 即 仅 显 示 年 、 月 、 日 ， 如 图 8.65 
所 示 。 

在 数据 表 UserSheet 中 ， 字 段 LoginName( 登 录 名 称 ) 是 表 的 主键 。 一 般 来 说 ， 在 用 户 设 
置 登录 名 称 之 后 ， 该 信息 是 不 允许 修改 的 。 为 了 避免 用 户 在 此 页 面 中 对 登录 名 称 信息 进行 
修改 ， 这 里 还 需要 将 登录 名 称 所 对 应 的 文本 框 控件 theName 的 【只 读 】 属 性 设置 为 True， 
即 不 允许 用 户 修改 其 信息 。 
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8.64 ” 绑 定 动态 数据 
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8.65 设置 动态 数据 的 显示 格式 


此 外 ， 对 于 用 户 的 性 别 信息 ， 这 里 仍 采用 RadioButtonList 控件 。 而 其 初始 化 数据 的 显 
示 ( 即 默认 的 选中 的 项 应 与 当前 登录 用 户 的 性 别 一 致 ) 将 在 Page_Load 事件 中 通过 代码 来 实 
现 。 以 下 ， 是 Page_Load 事件 的 代码 : 

【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If (Not Page.IsPostBack) Then 

"判断 Session 变量 UserID 是 否 存在 

If IsDBNull (Session("userid")) Or Trim(Session("userid")) = "" Then 
"session 变量 UserID 不 存在 ， 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 

else 
"判断 数据 集中 当前 用 户 的 性 别 ， 并 初始 化 RadioButtonList 控件 中 默认 选中 的 项 
if DataSetl.DefaultView.Table.Rows (0) ("Sex")=" 男 " then 

Sex .Items (0) .Selected = True 


Sex .Items (1) .Selected False 
else 

Sex.Items (0) .Selected = False 

Sex.Items (1) .Selected = True 


end if 
End If 
end if 
End Sub 


在 Page_Load 事件 中 ， 还 有 一 项 重要 的 功能 ， 那 就 是 判断 Session 变量 UserID 的 值 是 
否 存在 。 当 用 户 正 常 登录 后 ，Session 变量 UserID 的 值 是 存在 的 ， 即 登录 用 户 的 ID; 而 当 
用 户 未 经 登录 直接 访问 此 页 面 时 ，Session 变量 UserID 是 不 存在 的 ， 此 时 数据 集中 的 记录 
为 空 。 由 于 对 用 户 信息 的 修改 是 必须 指定 当前 用 户 的 ， 如 果 Session 变量 UserID 不 存在 将 
导致 页 面 无 法 正常 操作 。 为 此 , 在 Page_ Load 事件 中 首先 对 Session 变量 UserID 进行 判断 ， 
如 果 该 变量 不 存在 则 将 页 面 跳 转 至 登录 页 面 ， 以 便 用 户 正常 登录 后 再 进行 操作 。 

对 所 修改 的 用 户 信 息 的 具体 提交 操作 如 下 。 

(1) 打开 【应 用 程序 】 面 板 组， 切换 至 【服务 器 行为 】 面 板 ， 单 击 剧 按钮 ， 在 弹出 的 
菜单 中 选择 【更 新 记录 】 命 令 ， 将 弹出 【更 新 记录 】 对 话 框 ， 如 图 8.66 所 示 。 
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8.66 


【更 新 记录 】 对 话 框 


(2) 在 【提交 值 ， 自 】 下 拉 列 表 框 中 选择 当前 页 面 所 定义 的 表单 元 素 forml， 数 据 库 


连接 选择 Cnn， 更 新 表格 选择 UserSheet。 此 时 ， 在 【 列 】 列 表 框 中 将 会 列 出 数据 表 中 的 所 


有 字段 。 这 里 ， 对 所 需 更 新 的 字段 均 需 设置 其 更 新 的 值 。 当 提交 表单 中 的 表单 元 素 (如 文本 
框 、 选 择 下 拉 列 表 框 、 单 选 按 钮 等 ) 存 在 ID 名 与 字段 名 相同 时 ， 系 统 会 自动 将 其 对 应 起 来 ， 
即 设置 该 字段 的 更 新 值 为 同名 的 表单 元 素 的 提交 值 (如 图 中 的 Email 字段 与 email 表单 元 


素 )。 对 于 不 


同名 的 情况 ， 则 须 进 行 手工 匹配 。 操 作 方 法 是 ， 首 先 选 择 字 段 ， 然 后 从 【 值 】 


下 拉 列 表 框 中 选择 作为 更 新 值 的 表单 元 素 (如 图 中 的 Address 字段 与 addr 表单 元 素 )。 对 于 


无 须 进行 更 新 的 字段 ， 则 可 不 进行 任何 操作 (如 图 中 的 Code 字段 和 JHTag 字段 )。 


单 击 【确定 】 按 钮 ， 完 成 更 新 记录 的 设置 。 


(4) 当 用 户 修改 相应 的 信息 后 , 单 击 【确认 】 按 钮 ， 即 可 按照 以 上 的 设置 执行 更 


至 此 ， 修 改 信 息 页 面 的 功能 全 部 完成 ， 页 面 预览 如 图 8.67 所 示 。 
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时 和 和 :Mt 
部 村 地 址 : [hyn_1203@vip sinacom 


个 十 人 并 料 ( 生 内 宇 ) 


真实 姓名 : | 明 胃 络 


性 虽 : @ 男 C 支 


出 生日 期 : |1975123 


工作 单位 靖 而 攻 林 


国定 电话 : [0731-9583859 


种 动 电话 : [13912312311 


EYE 


[ET 


ET 


(3) 对 于 更 新 成 功 后 ， 系 统 自动 转向 的 页 面 ， 这 里 设置 为 登录 后 的 主页 面 Main.aspx。 
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8.67 页 面 预览 


新 操作 。 
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8.6 用 户 密码 修改 


在 修改 信息 功能 中 ， 不 包括 对 用 户 密码 的 修改 。 这 是 因为 在 修改 用 户 密码 时 ， 用 户 必 
须 输 入 原 用 户 密 码 。 只 有 原 密码 正确 ， 才 能 执行 更 新 密码 的 操作 ， 这 也 是 出 于 安全 方面 的 
考虑 。 所 以 ， 在 修改 用 户 信息 中 ， 仅 提供 了 对 修改 密码 操作 的 链接 。 


对 于 | 


户 密码 的 修改 ， 其 设计 思路 是 : 首先 创建 数据 集 ， 获 取 当 前 登录 用 户 的 基本 信 


息 , 包括 用 户 名 和 原 登 录 密 码 。 然后, 创建 三 个 文本 框 控件 , 其 ID 分 别 为 OldPwd、 thePass、 
SurePass, 其 模式 均 为 密码 模式 。 其 中 , OldPwd 文本 框 用 于 输入 当前 用 户 的 原 密码 , thePass 
文本 框 用 于 输入 所 要 修改 的 新 密码 ，SurePass 文本 框 用 于 再 次 输入 新 密码 。 


对 于 月 


户 所 输入 数据 的 合法 性 与 正确 性 ， 均 采用 验证 服务 器 控件 来 验证 。 为 了 验证 用 


户 所 输入 的 旧 密 码 的 正确 性 ， 需 要 创建 一 个 与 文本 框 控件 OldPwd 相关 联 的 
CompareValidator 验证 服务 器 控件 ， 其 所 要 比较 验证 的 值 为 前 面 所 获取 的 当前 用 户 的 原 密 
码 ,同时 , 创建 一 个 与 文本 框 控件 thePass 相关 联 的 RequiredFieldValidator 验证 服务 器 控件 ， 
要 求 在 提交 数据 之 前 必须 输入 新 密码 。 为 了 验证 再 次 输入 的 新 密码 与 在 thePass 文本 框 中 输 
入 的 新 密码 一 致 ， 还 需 创建 一 个 与 文本 框 控件 PassSure 相关 联 的 CompareValidator 验证 控 
件 ， 其 所 要 比较 验证 的 控件 为 文本 框 控件 thePass。 


此 外 ， 


为 了 便于 更 新 记录 ， 还 需 在 页 面 上 添加 一 个 隐藏 域 来 存储 指定 要 更 新 记录 的 用 


户 名 ， 其 取 值 可 从 数据 集中 的 字段 LoginName 的 值 来 获取 。 
(1) 在 设计 操作 界面 之 前 ， 先 添加 一 个 数据 集 ， 其 属性 设置 如 图 8.68 所 示 。 


其 中 ， 


数据 集 x 
rr 

过 接 :mm 司 /sx | 取消 
表格 : |vsersheet | | 

帮助 


”失败 时 显示 调试 信息 


8.68 添加 数据 集 


名 称 设 为 DataSet1， 筛 选 条 件 设 置 为 字段 Code 的 值 等 于 阶段 变量 UserID 。 


(2) 可 设计 出 修改 用 户 密码 的 操作 界面 ， 如 图 8.69 所 示 。 
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8.69 页面 设计 


在 此 界面 中 ,验证 控件 Comparel 与 验证 控件 Compare2 虽 同 为 CompareValidator 控件 ， 
但 其 比较 值 的 类 型 不 同 。 验证 控件 Comparel 是 将 OldPwd 文本 框 中 的 值 与 一 个 常量 进行 比 
较 ， 该 常量 值 在 Page_ Load 事件 中 从 数据 集 的 UserPass 字段 中 获取 并 指定 ， 而 验证 控件 
Compare2 则 是 比较 两 个 文本 框 控件 thePass 和 PassSure 的 值 是 否 匹配 。 
对 于 隐藏 域 Name, 主要 用 于 在 更 新 记录 时 便于 识别 所 要 更 新 的 记录 ,其 值 设 置 为 <%# 
DataSetl.FieldValue("LoginName", Container) %>， 即 数据 集中 LoginName 字段 的 值 。 
对 于 数据 的 更 新 ， 仍 采用 Dreamweaver 8 中 【服务 器 行为 】 面 板 的 【更 新 记录 】 命 令 
来 实现 。 
打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 困 按 钮 ， 在 弹出 的 菜单 
中 选择 【更 新 记录 】 命 令 ， 将 弹出 【更 新 记录 】 对 话 框 ， 如 图 8.70 所 示 。 
这 里 ， 所 需 设置 对 应 值 的 列 仅 包括 LoginName 和 UserPass。 其 中 ， 字 段 UserPass 是 所 
要 更 新 的 数据 ， 其 取 值 设 为 文本 框 控件 thePass 的 值 ， 字段 LoginName 是 用 于 识别 所 要 更 
新 的 记录 的 主键 ， 其 取 值 设 为 隐藏 域 Name 的 值 。 单 击 【 确 定 】 按 钮 ， 完 成 设置 。 
切换 至 【代码 】 视 图 ， 这 里 还 需 添加 页 面 的 Page_Load 事件 ， 其 代码 如 下 : 
【示例 代码 】 
Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If (Not Page.IsPostBack) Then 
"判断 Session 变量 UserID 是 否 存在 
If IsDBNull (Session("userid")) Or Trim(Session("userid")) = "" Then 
"Session 变量 UserID 不 存在 ， 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
Else 
If DataSet1l1.DefaultView.Table-Rows .Count>0 Then 


' 当 数据 集 的 记录 不 为 空 时 , 设置 comparel 控件 的 比较 值 为 数据 集中 的 UserPass 字段 值 


Comparel .ValueToCompare = 


“234 。 


第 8 章 会 员 管 理 3 


DataSet1.DefaultView.Table-Rows (0) ("UserPass") 
End if 


图 8.70 【更 新 记录 】 对 话 框 
至 此 ， 修 改 用 户 密码 的 页 面 功能 全 部 完成 ， 页 面 预览 效果 如 图 8.71 所 示 。 


二 作 改 用 户口 令 - Microsoft Internet Explorer 


图 8.71 页 面 预览 效果 


8.7 习 题 


(1) 练习 ASP.NET 中 的 验证 服务 器 控件 的 使 用 。 
(2) 用 户 注册 页 面 中 ,在 发 送 电 子 邮 件 之 前 添加 对 是 否 连接 Internet 的 判断 或 添加 错误 
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控件 ， 避 免 因 发 送 电子 邮件 失败 而 导致 页 面 异 常 。 
(3) 修改 找 回 密码 功能 ， 当 用 户 输 入 的 出 生日 期 和 密码 提示 问题 答案 均 正确 时 ， 直 接 
将 密码 发 送 至 用 户 所 注册 的 邮箱 中 ， 并 提示 用 户 接收 邮件 。 
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第 9 章 网 络 相 册 


网 络 相册 是 为 个 人 用 户 提供 的 具有 个 性 化 的 展示 平台 ， 它 可 以 提供 对 个 人 相片 的 网 络 
存储 、 分 类 管理 和 对 外 展示 。 伴 随 着 网 络 的 发 展 ， 网 络 相册 也 逐渐 成 为 网 上 冲浪 者 的 新 宠 。 


9.1 系统 分 析 


9.1.1 系统 功能 


对 于 网 络 相册 来 说 ， 对 外 展示 、 提 供 浏览 是 其 最 基本 的 功能 。 浏 览 者 可 直接 查看 或 分 
类 查看 用 户 上 传 的 所 有 相片 。 同 时 ， 对 于 感 兴趣 的 相片 ， 还 可 查看 该 相片 的 他 人 留言 或 发 
表 自 己 的 留言 信息 。 

通过 网 络 相册 的 后 台 ， 用 户 可 自 定 义 相片 分 类 信息 ， 上 传 自己 的 相片 ， 同 时 可 对 己 上 
传 的 相片 进行 管理 ， 包 括 对 相片 信息 的 修改 、 删 除 和 对 相片 留言 的 管理 。 

作为 网 络 相册 的 辅助 功能 ， 需 要 对 相片 的 点 击 和 留言 进行 统计 ， 统 计 出 来 的 点 击 数 和 
留言 数 在 一 定 程度 上 说 明了 浏览 者 对 照片 的 关注 和 喜爱 程度 。 

在 本 例 中 ， 将 网 络 相册 的 功能 分 为 前 台 页 面 功能 和 后 台 页 面 功能 。 

1. 前 台 页 面 功能 

前 台 页 面 主要 针对 一 般 浏 览 者 ,其 功能 包括 发 布 浏览 相册 、 查 看 指定 相片 及 相关 留言 、 
发 表 留 言 等 。 

1) ”浏览 相册 

在 网 络 相册 的 主页 面 ， 可 通过 选择 相片 的 分 类 来 浏览 指定 分 类 下 的 所 有 相片 。 浏 览 
片 的 同时 ， 可 查看 相片 的 点 击 数 和 留言 数 。 

2) ”查看 指定 相片 

对 于 感 兴趣 的 相片 ， 可 通过 点 击 来 放大 该 相片 的 显示 ， 同 时 还 可 查看 与 该 相片 相关 的 


| 


留言 


Zl 


3) ”发 表 留 言 

对 于 感 兴趣 的 相片 ， 可 发 表 自己 的 留言 。 

2. 后 台 页 面 功 能 

后 台 页 面 主 要 针对 管理 员 ， 其 功能 包括 添加 分 类 、 管 理 分 类 、 上 传 相 片 、 管 理 相 片 和 
管理 相片 留言 等 。 

1) ”添加 分 类 

允许 添加 相片 的 分 类 信息 。 
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2) “管理 分 类 

对 相片 的 分 类 信息 进行 管理 ， 包 括 对 指定 分 类 的 编辑 和 删除 。 当 指定 的 分 类 下 存在 相 
片 信 息 时 ， 不 可 执行 对 该 分 类 的 删除 操作 。 

3) 上传 相片 

允许 上 传 指定 的 相片 。 在 上 传 相 片 的 同时 ， 需 指定 相片 名 称 和 相片 的 所 属 分 类 。 同 时 ， 
提供 对 相片 的 预览 功能 

4) ”管理 相片 

对 所 上 传 的 相片 进行 管理 ， 包 括 对 相片 信息 的 修改 和 删除 以 及 对 指定 相片 的 留言 进行 
管理 的 操作 链接 。 同 时 ， 提 供 对 相片 的 预览 功能 

5) ”管理 相片 留言 

对 指定 相片 的 留言 信息 进行 管理 ， 包 括 对 所 有 留言 的 浏览 和 对 指定 留言 的 删除 操作 。 


9.1.2 数据库 的 建立 


本 系统 使 用 Microsoft Access 2000 类 数据 库 ， 其 数据 库 名 为 DataMdb， 在 该 数据 库 中 
添加 了 ClassInfo( 分 类 信息 表 )、PhotoInfo( 相 片 信息 表 )、PhotoLY( 相 片 留 言 信息 表 ) 和 
UserInfo( 管 理 员 信息 表 ) 4 个 数据 表 。 


1. 分 类 信息 表 (ClassInfo) 
ClassInfo 数据 表 主 要 用 于 存储 相片 的 分 类 信息 ， 其 表 结 构 见 表 9.1。 


表 9.1 Classlnfo 数据 表 


字段 名 |。 数据 类 型 
中 [sw as is | | 
i 7 | 


2. 相片 信息 表 (PhotoInfo) 


PhotoInfo 数据 表 主 要 用 于 存储 相片 的 基本 信息 ， 其 表 结 构 见 表 9.2。 
表 9.2 Photolnfo 数据 表 
字段 名 数据 类 型 字段 描述 键 

ID 自动 编号 相片 编号 

PicAddr 文本 相片 地 址 

PicName 文本 相片 名 称 

ClassID 数字 所 属相 片 分 类 的 编号 

DDate 日 期 /时 间 相片 的 上 传 时 间 

ClickNum 数字 点 击 次 数 

Descr 备注 相片 描述 
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说 明 : 字段 Ddate 的 默认 值 为 系统 函数 Now()， 该 函数 用 于 获取 系统 的 当前 时 间 。 字 段 
ClassID 表示 所 属 分 类 编号 ， 该 字段 与 ClassInfo 数据 表 中 的 字段 ID 相关 联 。 


3. 相片 留言 信息 表 (PhotoLY) 
PhotoLY 数据 表 主 要 用 于 存储 相片 的 留言 信息 ， 其 表 结 构 见 表 9.3。 
表 9.3 “PhotoLY 数据 表 


PhotoID 


LYName < 留言 人 名 称 
LYContent 备注 留言 内 容 


LYTime 日 期 /时 间 留言 时 间 


说 明 : 字段 PhotoID 表示 留言 所 对 应 的 相片 编号 ， 该 字段 与 PhotoInfo 数据 表 中 的 字段 ID 
相关 联 。 


4. 管理 员 信息 表 (UserInfo) 
UserInfo 数据 表 主 要 用 于 存储 管理 员 的 基本 信息 ， 其 表 结构 见 表 9.4。 


表 9.4 Userlnfo 数据 表 


字段 名 


ID 


9.1.3 ”站 点 设置 


本 例 中 ， 站 点 设置 的 本 地 信息 如 图 9.1 所 示 。 

其 中 ， 站 点 名 称 设 置 为 “网 络 相册 ”， 本 地 根 文件 夹 设置 为 网 络 相册 系统 所 在 的 磁盘 
目录 ， 默 认 图 像 文件 夹 则 设置 为 网 络 相册 系统 下 的 Image 目录 ，HTTP 地 址 设置 为 
“http://localhost/wlxc”( 在 此 之 前 ， 需 将 网 络 相 册 系 统 设置 为 Web 共享 ， 并 设置 其 共享 名 
为 wlxc)。 

站 点 设置 中 ， 远 程 信息 设置 如 图 9.2 所 示 。 

由 于 对 网 络 相册 系统 的 设计 、 测 试 和 运行 均 是 在 本 机 上 操作 的 ， 因 此 这 里 将 访问 方式 
设置 为 【本 地 /网 络 】， 而 远 端 文件 夹 则 与 本 地 根 文件 夹 设置 为 相同 的 目录 。 

站 点 设置 中 ， 测 试 服务 器 设置 如 图 9.3 所 示 。 

对 于 站 点 的 部 署 ， 请 参考 本 书 第 7 章 ， 这 里 不 再 袭 述 。 


* 


“240。 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


图 9.1 本 地 信息 


图 9.2 远程 信息 


图 9.3 测试 服务 器 
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9.2 前台 功能 实现 


网 络 相册 的 前 台 功能 包括 浏览 相册 、 查 看 相片 和 发 表 留言 。 其 中 ， 浏 览 相册 页 面 所 对 
应 的 文件 为 Defaultaspx， 查 看 相片 和 发 表 留 言 操作 被 安排 在 同一 页 面 ， 其 文件 名 为 


ViewPhoto.aspx。 
9.2.1 构建 模板 页 


在 实现 前 台 页 面 的 功能 之 前 ， 先 来 为 前 台 的 页 面 构建 一 个 模板 。 模 板 的 用 途 是 构建 一 
个 基本 的 页 面 框架 布局 ， 从 而 使 得 其 他 页 面 可 在 此 基础 上 快捷 生成 ， 并 使 整体 的 布局 保持 
一 致 。 此 外 ， 通 过 更 新 模板 ， 可 以 更 新 建立 在 此 模板 上 的 所 有 页 面 ， 这 也 是 模板 最 强大 的 
(1) 选择 【文件 】 |【 新 建 】 命 令 ， 在 弹出 的 【新 建文 档 】 对 话 框 中 选择 【模板 页 】| 
【ASPNET VB 模板 】 选 项 ， 如 图 9.4 所 示 。 单 击 【 创 建 】 按 钮 ， 即 可 新 建 一 个 模板 页 。 
[CCC 攻 


天 助 | 首 过 驳 娄 他， 环 于 更 下 阳 消 
9.4 【新 建文 档 】 对 话 框 


(2) 导入 外 部 样式 表 。 打开 CSS 面板 并 右 击 , 在 弹出 的 快捷 菜单 中 选择 【附加 样式 表 】 
命令 ， 此 时 将 弹出 【链接 外 部 样式 表 】 对 话 框 ， 如 图 9.5 所 示 。 


EEEEEREE E34 


图 9.5 【链接 外 部 样式 表 】 对 话 框 


(3) 单 击 【 浏 览 】 按 钮 ， 选 择 系统 目录 中 的 CSS 文件 夹 下 的 Main.css 文件 ， 设 置 添 加 
方式 为 【链接 】。 单 击 【 确 定 】 按 钮 ， 完 成 样式 表 的 附加 。 
(4) 切换 至 【设计 】 视 图 ， 单 击 【 属 性 】 面 板 中 【页 面 属性 】 按 钮 ， 在 弹出 的 【页 面 
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属性 】 对 话 框 中 ， 设 置 页 面 的 背景 颜色 值 为 “#d2d2ca”， 上 边 距 为 0， 如 图 9.6 所 示 。 
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图 9.6 【页 面 属性 】 对 话 框 


(5) 单 击 【 确 定 】 按 钮 返回 设计 窗口 。 选 择 【 插 入 】| 【表格 】 命 令 ， 在 页 面 上 插入 


一 个 3 行 1 列 的 表格 table1， 其 属性 设置 如 图 9.7 所 示 。 


图 hm Nh 而 poo 118 未 ”到 间距 边框 
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图 9.7 表格 属性 的 设置 


(6) 在 表格 tablel 的 第 1 行 中 ， 插 入 一 个 图 像 ， 其 源 文件 设置 为 Image 文件 夹 下 的 
Top.gif。 在 第 2 行 中 ， 设 置 其 背景 颜色 值 为 “证 8FAFC”， 同 时 创建 一 个 链接 ， 其 文本 为 
“后 台 管 理 ”， 链 接地 址 为 “../Admin.aspx”。 在 表格 tablel 的 第 3 行 中 ， 插 入 一 个 1 行 2 


列 的 嵌 套 表格 table2， 其 属性 设置 如 图 9.8 所 示 。 


国 表格 Id 三 | 更 |szo |[ 染 索 ”到 ”着 充 0 ET 
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9.8” 赃 套 表格 属性 的 设置 


(7) 在 表格 table2 中 ， 设 置 第 1 列 的 单元 格 宽度 为 160， 第 2 列 的 单元 格 宽度 为 620， 


同时 设置 两 个 单元 格 的 背景 颜色 值 为 “#FFFFFF”。 


将 光标 置 于 表格 table2 的 第 1 个 单元 格 中 ， 选择 【插入 】| 【模板 对 象 ]1【 可 编辑 区 域 】 


命令 ， 此 时 将 弹出 【新 建 可 编辑 区 域 】 对 话 框 ， 如 图 9.9 所 示 。 


Ee 
ee | 


图 9.9 【新 建 可 编辑 区 域 】 对 话 框 


设置 名 称 为 EditRegion3， 单 击 【 确 定 】 按 钮 ， 完 成 可 编辑 区 域 的 添加 。 在 表格 table2 
的 第 2 个 单元 格 中 ， 重 复 以 上 操作 ， 添 加 名 称 为 EditRegion4 的 可 编辑 区 域 。 
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(8) 选择 【文件 】| 【保存 】 命 令 ， 将 页 面 命名 为 “前 台 模 板 ”， 并 加 以 保存 。 此 时 ， 
系统 会 自动 在 网 络 相 册 的 系统 目录 下 新 建 一 个 名 为 Templates 的 文件 夹 ， 并 在 其 中 生成 一 
个 名 为 “前 台 模 板 .dwt.aspx” 的 页 面 文件 ， 这 就 是 刚才 创建 的 模板 。 

至 此 ， 前 台 功 能 页 面 的 模板 创建 完成 ， 如 图 9.10 所 示 。 
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图 9.10 ”前台 功能 页 面 模板 
9.2.2 ”浏览 相册 


浏览 相册 是 用 户 进入 网 络 相 册 系 统 的 首页 面 。 在 该 页 面 中 ， 首 先 必须 罗列 出 所 有 的 相 
片 分 类 ， 以 供用 户 单 击 选择 ， 然 后 需要 显示 某 一 分 类 下 的 所 有 相片 以 供 浏览 。 在 相片 的 浏 
览 中 ， 除 了 显示 相片 外 ， 还 需 显示 相片 的 附加 信息 ， 包 括 相 片 名 称 、 单 击 次 数 、 留 言 次 数 
和 相片 描述 等 。 

1. 页 面 基本 结构 的 实现 

下 面 ， 来 看 一 看 该 页 面 的 具体 实现 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 (动态 页 )， 将 其 命名 为 Default.aspx。 选 择 【 修 
改 】I【 模 板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 前 面 所 创建 
的 【前 台 模 板 】， 如 图 9.11 所 示 。 并 单 击 【 选 定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 将 光标 移 至 EditRegion3 可 编辑 区 域 中 ， 添 加 文本 “相片 分 类 ”， 设 置 其 字体 大 小 
为 14 像素 , 并 加 粗 显示 。 再 将 光标 移 至 EditRegion4 可 编辑 区 域 中 , 添加 文本 “当前 分 类 : ”， 
设置 其 字体 为 14 像素 ， 加 粗 显 示 ， 并 在 该 文本 下 添加 一 条 水 平 线 ， 即 <hr> 标 签 。 
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站 点 @): [同人 要 肌 S| 


Ee 取消 | 


屎 当 模板 改变 时 更 新 页 面 0D) 帮助 oD | 


9.11 选择 模板 
页 面 基本 结构 如 图 9.12 所 示 。 


[E:\Book\ASP.NET( 四 )\boo ample\ 相 出 管 理 \Defaultaspx (XHTML)*] 
EECEEETITOEEOIEETIETT 
合用 ~ 种 回 启 | 回 回回 -看 -加 久 加 | 曾 - 员 


[显示 相片 分 类 ] [显示 当前 分 类 下 的 相片 ] 


图 9.12 页 面 基本 结构 

2. 建立 数据 库 连接 

对 于 相片 分 类 的 显示 可 通过 Dreamweaver 8 中 提供 的 【服务 器 行为 】 面 板 中 的 【重复 
区 域 】 命令 来 实现 ， 即 采用 ASP.NET 中 的 Repeater 数据 控件 。 而 对 于 指定 分 类 下 的 相片 浏 
览 ， 则 可 通过 【服务 器 行为 】 面板 中 的 【数据 列表 】 命令 来 实现 ， 即 ASP.NET 中 的 DataList 
数据 控件 。 为 此 ， 需 要 分 别 创建 两 个 数据 集 。 

在 创建 数据 集 之 前 ， 先 来 建立 数据 库 连接 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【数据 库 】 面 板 ， 单 击 国 按 钮 ， 从 弹出 的 菜单 
中 选择 【OLE DB 连接 】 命 令 ， 在 弹出 的 【OLE DB 连接 】 对 话 框 中 设置 连接 名 称 为 Cnn， 
如 图 9.13 所 示 。 
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(2) 单 击 【建立 】 按 钮 ， 在 Provider 选项 卡 中 选择 Microsoft Jet 4.0 OLE DB Provider。 
然后 切换 至 Connection 选项 卡 , 单 击 … 按钮 , 选择 网 络 相 册 系 统 目录 下 的 Data 子 目录 下 的 


Data.mdb 文件 作为 系统 数据 库 的 文件 ， 如 图 9.14 所 示 。 


We Data Link Properties 
Provider Comnection | Nivaneed | Al | 
Specily the folowng to connect to Access data: 

1. Select or enier a dalabase name: 
5PNET 克 Nbook\exonple 8 阴 管 理 \dalaDala mb | 
2 Enter nlomation lo log on to the dalabate: 

User oame | 

Easswor 

[5 Blork password 厂 Alow aving password 


完成 数据 库 的 创建 。 
3. 创建 两 个 数据 集 


图 9.14 选择 数据 库 
(3) 单 击 【确定 】 按 钮 ， 返 回 【OLE DB 连接 】 对 话 框 ， 并 再 次 单 击 【确定 】 按 钮 ， 


下 面 ， 创 建 两 个 数据 集 ， 分 别 用 


(1) 在 【应 用 


程序 】 面 板 组 中 ， 


于 绑 定 相片 分 类 和 指定 分 类 下 相片 浏览 的 显示 。 
分 别 切换 至 【服务 器 行为 】 面 板 ， 单 击 蝇 按钮 ， 从 弹 


出 的 菜单 中 选择 [数据 集 ] 命 令 , 在 弹出 的 【数据 集 】 对 话 框 中 , 设置 数据 集 名 称 为 DataSetl， 


连接 选择 Cnn， 表 格 选择 PhotoInfo， 
如 图 9.15 所 示 。 


设置 筛选 条 件 为 字段 ClassID 等 于 URL 变量 ClassID， 


这 里 所 创建 的 数据 集 ， 主 要 用 于 绑 定 指定 分 类 下 的 相片 信息 的 显示 。 由 于 所 要 显示 的 
相片 信息 ， 除 了 包括 PhotoInfo 数据 表 中 的 信息 之 外 ， 还 包括 从 数据 表 PhotoLY 中 统计 相 
应 相片 的 留言 数 ,因此 仅 用 一 个 简单 的 Select 语句 从 数据 表 PhotoInfo 中 查询 信息 是 不 行 的 。 
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图 9.15 创建 数据 集 DataSet1 
(2) 单 击 【高 级 】 按 钮 ， 此 时 将 弹出 【数据 集 】 对 话 框 的 高 级 模式 ， 如 图 9.16 所 示 。 


图 9.16 【数据 集 】 对 话 框 的 高 级 模式 


在 SQL 后 的 文本 框 中 ， 对 SQL 语句 进行 修改 ， 修 改 后 的 语句 如 下 : 

SELECTa.*, ('~/photo/'+picaddr) as pic addr, classname, (select count (*) FROM 

photoly WHERE photoid=a.id) as Nums from photoinfo a,classinfo b where 

a.classid=b.id and a.ClassID = ? ORDER BY a.id 

在 此 语句 中 ，“?” 表 示 筛 选 条 件 中 所 定义 的 URL 参数 ClassID。 在 所 返回 的 记录 中 ， 
pic_addr 表示 相片 地 址 的 完整 路 径 ， 而 Nums 则 表示 该 相片 的 留言 数 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 。 

(3) 在 【服务 器 行为 】 面 板 中 ， 再 次 单 击 型 按钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命 
令 ， 新 建 数据 集 DataSet2， 如 图 9 了 7 所 示 。 

这 里 所 创建 的 数据 集 DataSet2 用 于 绑 定 相片 分 类 的 显示 。 
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图 9.17 创建 数据 集 DataSet2 
4. 相片 分 类 的 绑 定 显示 
添加 相片 分 类 的 绑 定 显示 具体 操作 如 下 。 
(1) 将 光标 置 于 文本 “相片 分 类 ”下 ， 在 【常用 -插入 】 工 具 栏 中 单 击 国 按 钮 ， 插 入 
一 个 <div> 标 签 。 然 后 切换 至 【代码 】 视 图 ， 在 <div> 标 签 中 添加 样式 
“style="padding-top:10px"”， 如 图 9.18 所 示 。 


<td width="180” colspan=2 aligr=center valign="top” bgcolor=| 
“#FFFFFF” style="padding-top:S5px:padding-left:5px"> 

<span style=“font-size:14px”>《b> 相 片 分 类 </b>《/ span> 

div style="padding-top: IOpx, Iv> 

Wt 


9.18 ”添加 标签 <div> 


(2) 在 【应 用 程序 】 面 板 组 中 切换 至 【 绑 定 】 面 板 ， 展 开 “ 数 据 集 (DataSet2)”， 如 
图 9.19 所 示 。 

(3) 拖 动 字段 ClassName 至 前 面 所 插入 的 <div> 起 始 标签 和 结束 标签 之 间 ， 同 时 在 【 属 
性 】 工 具 栏 中 设置 该 动态 文本 的 链接 ， 链 接地 址 为 : 


default .aspx?classid=<%# DataSet2.FieldValue ("ID", Container) %> 


即 指向 本 页 面 ， 传 递 参数 为 相片 分 类 所 对 应 的 人 D。 
(4) 选择 <div> 标 签 ， 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 型 


按钮 ， 在 弹出 的 菜单 中 选择 【重复 区 域 】 命 令 ， 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 设 置 数 
据 集 为 DataSet2， 并 设置 显示 所 有 记录 ， 如 图 9.20 所 示 。 


= | 
i 
图 9.19 【 绑 定 】 面 板 图 9.20 【重复 区 域 】 对 话 框 


(5) 单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 创建 。 


“247。 


“248。 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


至 此 ， 相 片 分 类 的 显示 绑 定 完成 。 
对 于 指定 分 类 下 的 相片 浏览 ， 其 数据 的 绑 定 显示 比 相片 分 类 的 绑 定 更 为 复杂 。 因 为 它 


所 要 重复 显示 的 数据 并 不 是 一 个 单独 的 动态 文本 ， 而 是 一 个 表格 。 


5. 创建 单条 数据 的 显示 
(1) 在 相片 浏览 区 域 ， 插 入 一 个 5 行 2 列 的 表格 ， 修 改 其 代码 如 下 : 


【示例 代码 】 
<table width="200" border="0" height="220" cellpadding=0 cellspacing=0> 
<tr height=130> 
<td colspan=2> 
<div style="width:190px;height:130px; padding-top:5px;background-image: 
url('image/photoback.gif');" align=center> 
<a href="ViewPhoto.aspx?id <%# DataSet1.FieldValue ("ID", Container) %>" 
target= self> 
<asp:Image ID="Imagel" width="180" Height="120" BorderWidth=0 ImageUrl 
<%# DataSet1.FieldValue("Pic Addr", Container) %> runat="server" /> 
</a></div> 
</td> 
</tr> 
<tr height=20> 
<td width="70"” align=right> 相 片 名 称 : </td> 
<td width="130"><font color="red"> <%# DataSetl.FieldValue ("PicName", 
Container) %> </font></td> 
</Er> 
<tr height=20> 
<td align=right> 点 击 次 数 : </td> 
<td><font color="red"> <%# DataSet1.FieldValue ("ClickName", 
Container) %></font></td> 
</tr> 
<tr height=20> 
<td align=right> 留 言 次 数 : </td> 
<td><font color="red"> <%# DataSet]l.FieldValue ("Nums", 
Container) %></font></td> 
</tr> 
<tr> 
<td align=right valign=top> 相 片 描述 : </td> 
<td valign=top><font color="red"> <%# DataSet1.FieldValue ("Descr", 
Container) %></font></td> 
</tr> 
</table> 


在 此 表格 中 ,第 1 行 用 于 显示 相片 的 图 像 。 这 里 ， 插 入 了 一 个 <div> 标 签 ， 并 设置 其 背 


景 为 Image 文件 夹 下 的 PhotoBack.gif， 其 目的 是 为 所 显示 的 图 像 添 加 一 个 边框 ， 以 使 页 面 
更 加 美观 。 表 格 的 其 余 4 行 分 别 用 于 显示 相片 名 称 、 点 击 次 数 、 留 言 次 数 和 相片 描述 ， 其 
显示 信息 分 别 从 数据 集 DataSetl 中 的 相应 字段 中 获取 。 


序 】 


(2) 将 以 上 显示 单条 数据 的 表格 代码 剪 切 (注意 ， 是 剪 切 而 不 是 复制 )。 打 开 【 应 用 程 
面板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 因 按钮， 从 弹出 的 菜单 中 选择 【数据 列表 】 
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令 ， 在 弹出 的 【数据 列表 】 对 话 框 中 ， 设 置 其 ID 为 DataList1， 数 据 集 选择 DataSetl， 
在 【显示 】 单 选 按 钮 组 中 选择 【所 有 记录 】 单 选 按 钮 。 选 择 模板 列表 中 的 【项 目 】 选 项 ， 
在 内 容 中 粘贴 前 面前 切 的 内 容 ， 然 后 在 【组 织 项 】 单 选 按钮 组 中 选择 【使 用 表 】 单 选 按钮 ， 
并 在 【 表 列 】 下 拉 列 表 框 中 选择 3， 在 【表格 单元 格 填充 顺序 】 单 选 按钮 组 中 选择 【 自 上 
而 下 换行 】 单 选 按 钮 ， 如 图 9.21 所 示 。 


rr J 
数据 集 : 站 .se 可 | 
四 四 一 这 eww | 
人 所 有 记录 
村 数字 县志 加 到 内 容 


0pe hei 130px; padding-top: 5p; 
ee Dat essed lie 
20” 


内 容 下 table width=”200”border= “0”height=" 220”cellpadding: 习 
tr heil 
人 td ec > 
8 ID="Inagel” vidth="180° Height="120” Bor. 


图 9.21 【数据 列表 】 对 话 框 
(3) 单 击 【确定 】 按 钮 ， 完 成 数据 列表 的 添加 。 下 一 步 ， 再 来 设置 重复 显示 项 目的 对 
齐 方式 。 在 【代码 】 视 图 中 ， 将 光标 置 于 <asp:DataList> 标 签 中 的 ItemTemplate 项 的 结束 标 
签 之 后 ， 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 【更 多 标签 】 按 钮 国 ， 在 弹出 的 【标签 选择 器 】 
对 话 框 中 ， 选 择 【ASPNET 标签 】|【 样 式 】 分 类 中 的 ItemStyle， 如 图 9.22 所 示 。 


个 标签 选择 器 
- - AlternatineItenStyle 
局 ”标语 言 村 和 aitfestae 


9.22 【标签 选择 器 】 对 话 框 


(4) 单 击 【插入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 将 【垂直 对 齐 方式 】 选 
项 设置 为 【顶端 ， 如 图 9.23 所 示 。 
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图 9.23 【标签 编辑 器 】 对 话 框 


(5) 单 击 【和 确定】 按钮 ， 此 时 在 代码 中 将 会 插入 DataList 控件 中 的 itemstyle 项 ， 如 
9.24 所 示 。 


</table> 
</ItemTemplate> 
/asp:DatalList> 
/center> 


图 9.24 添加 IltemStyle 项 

至 此 ， 指 定 分 类 下 的 相片 浏览 数据 绑 定 就 完成 了 。 

从 查看 页 面 的 基本 结构 (如 图 9.12 所 示 ) 中 可 以 发 现 还 有 一 个 动态 数据 需要 显示 ， 那 就 
是 文本 “当前 分 类 ”后 所 要 显示 的 当前 分 类 名 称 。 虽 然 在 数据 集 DataSetl 中 可 以 返回 当前 
所 浏览 的 相片 的 分 类 名 称 ， 但 是 当 指定 分 类 下 没有 相片 时 ， 此 数据 为 空 。 为 此 ， 可 以 再 次 
创建 一 个 数据 集 DataSet3， 其 属性 设置 如 图 9.25 所 示 。 


图 9.25 添加 数据 集 DataSet3 
这 里 所 选择 的 表格 为 ClassInfo, 筛选 条 件 设 置 为 字段 ID 等 于 URL 参数 ClassID 。 在 创 
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建 数据 集 DataSet3 之 后 ， 打 开 【 应 用 程序 】 面 板 组 ， 选 择 【 比 
定 】 面 板 ， 在 显示 出 来 的 数据 集中 选择 DateSet3， 并 将 其 展开 ， 
如 图 9.26 所 示 。 因 
单 击 字段 ClassName， 并 将 其 拖 至 文本 “当前 分 类 ”之 后 ， 上 
在 【属性 】 面 板 中 设置 其 文本 显示 颜色 为 红色 。 时 ey Oe 
至 此 ， 页 面 的 功能 实现 基本 完成 。 细 心 的 读者 也 许 会 发 现 ， 
对 于 数据 集 DataSetl 和 DataSet3， 其 筛选 的 条 件 变量 均 为 URL 
变量 ClassID， 即 页 面 所 传递 的 参数 ClassID。 而 当 用 户 浏览 网 络 
相册 的 首页 面 时 ， 是 不 可 能 带 参数 的 ， 此 时 数据 集 DataSetl 和 


数据 库 区 各 服务 器 行为 | 组件 


划 
DataSet3 所 返回 的 记录 均 为 空 ， 以 致 于 页 面 无 法 正常 显示 数据 。 TEA 


例如 ， 用 户 在 地 址 栏 中 输入 “http://localhost/wlxc/default.aspx” 图 926 【 绑 定 】 面 板 
来 访问 网 络 相册 ,此 时 没有 指定 相片 分 类 , 结果 就 无 法 显示 相应 
的 相片 ， 而 用 户 在 地 址 栏 中 输入 “http://localhost/wlxc/default.aspx?ClassID=1” 来 访问 网 络 
相册 , 则 可 显示 分 类 ID 为 1 的 所 有 相片 , 但 不 可 能 要 求 用 户 按 指定 的 标准 来 输入 地 址 进行 
访问 ， 这 也 是 不 现实 的 。 虽 然 这 并 不 会 导致 页 面 的 异常 发 生 ， 但 是 初次 打开 页 面 ， 什 么 也 
看 不 到 ， 只 有 选择 分 类 后 才能 看 到 相关 相片 ， 这 会 让 用 户 觉得 有 点 不 舒服 。 
那么 ， 有 什么 办 法 可 以 解决 以 上 问题 呢 ? 很 简单 ， 可 以 在 页 面 的 Page_Load 事件 中 添 
加 代码 ， 对 页 面 参 数 ClassID 是 否 为 空 进行 判断 。 如 果 为 空 ， 则 将 页 面 再 次 跳 转 至 本 页 面 ， 
并 将 数据 表 ClassInfo 中 的 第 一 个 分 类 ID( 可 从 数据 集 DataSet2 中 的 第 一 条 记录 获取 ) 作 为 页 
面 参数 进行 传递 。 也 就 是 说 ， 当 用 户 访问 首页 面 时 ， 默 认 显 示 第 一 个 分 类 的 所 有 相片 。 
Page_Load 事件 的 代码 如 下 : 
【示例 代码 】 
Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If Not IsPostBack() Then 
If Request.Querystring ("ClassID")="" then 
' 当 页 面 参 数 ClassID 为 空 时 
If DataSet2.DefaultView.Table.Rows .Count>0 Then 
' 当 数据 集 DataSet2 存在 记录 时 ， 获 取 其 首 条 记录 的 字段 ID 的 值 ， 并 作为 页 面 参数 传递 
Response.Redirect ("Default.aspx?ClassID="& DataSet2.DefaultView. 
Table.Rows (0) ("ID")) 
End If 
End If 


End If 
End sub 


至 此 ， 页 面 的 功能 实现 全 部 完成 ， 页 面 预览 效果 如 图 9.27 所 示 。 
点 击 不 同 的 分 类 ， 可 浏览 该 分 类 下 的 所 有 相片 。 点 击 某 个 相片 ， 则 可 查看 该 相片 的 相 
关 留 言 ， 同 时 也 可 发 表 留 言 ， 这 也 是 接 下 来 所 要 介绍 的 内 容 。 
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] +FE -中 " 固 回潮 | 因 WR 如 fF 可 
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相片 名称: 折 本 的 三宝 相片 名称 ; 他 在 看 我 喇 
点 击 次 沽 :5 


9.2.3 ”查看 相片 


图 9.27 页 面 预览 效果 


在 查看 相片 的 页 面 中 ， 其 主要 功能 可 分 为 以 下 4 个 部 分 。 
@ ”显示 指定 相片 的 基本 信息 ， 包 括 相片 名 称 、 上 传 时 间 、 点 击 次 数 、 留 言 次 数 和 相 
片 描述 等 ; 

@ ”显示 指定 相片 所 属 分 类 下 的 其 他 相关 相片 ; 

@ ”显示 指定 相片 的 留言 信息 ; 

@ ”人 允许 发 表 留言 。 

下 面 介绍 该 页 面 的 具体 实现 。 

新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 ViewPhoto.aspx。 选 择 【 修 改 】|【 模 
板 】I【 套 用 模板 到 页 】 命令, 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【前 台 模板 】， 单 击 【 选 
定 】 按 钮 ， 将 模板 应 用 到 页 面 。 

在 实现 页 面 之 前 ， 先 来 考虑 页 面 的 功能 区 域 的 划分 。 对 于 相关 相片 的 显示 ， 可 在 可 编 
辑 区 域 EditRegion3 中 实现 ， 而 其 余 功能 则 可 在 可 编辑 区 域 EditRegion4 中 实现 ， 如 图 9.28 


所 示 。 


接 下 来 ， 将 逐步 实现 各 项 功能 。 
首先 , 来 看 相关 相片 的 显示 。 所 谓 相 关 相片 ， 是 指 与 所 查看 的 相片 同一 类 的 其 他 相片 。 


(1) 在 【应 上 


其 数据 的 显示 可 通过 “重复 区 域 ”来 实现 ， 为 此 先 来 创建 一 个 数据 集 。 


程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 从 弹出 的 


菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【高 级 】 按 钮 ， 切 换 至 
【数据 集 】 对 话 框 的 高 级 模式 。 单 击 【添加 参数 】 按 钮 而 ， 在 弹出 的 【编辑 参数 】 对 话 杠 


i 
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中 ， 设 置 名 称 为 “@ID ”， 类 型 选择 BigInt， 如 图 9.29 所 示 。 


文件 (E) 刘 辑 人 查看 括 入 (D 修 织 (M) 文本 0) 分 售 [C) 站 点 (3) 窗口 (Ww) 天 和 (HD 
外 用 ~ 六 回电 | 因 目 国 :和 银 - 间 到 办 | 回 " 吕 


EE EEE 无 示 古文 档 


[显示 指定 的 相片 ] | [显示 指定 相片 有 基本 信息 ] | 


[显示 指定 相片 鸭 留 言 ] | 


| 
| 
[ 旺 东 相关 相片 ] | 


[发 表 贸 言 ] | 


nst ner) Dodp? Gorn) Mele? tr) RD GL AL EY ts) A 人 tiastaeeelittblay [VT A I rr dv E71 


9.28 ”页 面 功能 区 域 分 布 


图 9.29 【编辑 参数 】 对 话 框 


(2) 单 击 【 建 立 】 按 钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 【 名 称 】 为 ID，【 源 】 
为 【URL 参数 】， 如 图 9.30 所 示 。 


生成 什 x 
SR 
源 : |uaL 参数 了 取消 
[aal 和 


9.30 【生成 值 】 对 话 框 


(3) 单 击 【确定 】 按 钮 ， 返 回 【 编 辑 参数 】 对 话 框 ， 再 次 单 击 【确定 】 按 钮 ， 完 成 此 
参数 的 添加 。 由 于 在 SQL 语句 中 ， 将 会 两 次 调用 到 此 参数 ， 因 此 需要 重复 以 上 步骤 ， 添 加 
一 个 名 为 “@ID1” 的 参数 ， 其 取 值 与 参数 “@ID ”的 取 值 一 样 。 

(4) 在 SQL 文本 框 中 输入 用 于 查询 数据 的 SQL 语句 ， 如 图 9.31 所 示 。 


S 


“254° Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


rr 
这 EC 二 wm | 
ga: i mer, | | 
yy rt re 0 FE | 
J | el 
才 数 ， 轩 刁 
QTD 
leID1 ETnt 
如 果 失 鸯 ， 则 圣 到 - 「 
”失败 时 显示 调试 信息 
数据 库 项 - Er 村 添加 到 SQL 
图 是 ve 三 二 
mm | 
ORDER BY 


9.31 创建 数据 集 DataSet1 


在 此 SQL 语句 中 ， 使 用 了 一 个 Select 子 查询 来 获取 指定 相片 ID 所 属 的 相片 分 类 。 单 
击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 

(5) 将 光标 移 至 EditRegion3 可 编辑 区 域 中 ， 添 加 文本 “相关 相片 ”， 设 置 其 字体 大 小 
为 14 像素 ， 并 加 粗 显 示 。 

(6) 在 文本 “相关 相片 ”下 ， 单 击 【 常 用 -插入 】 工 具 栏 中 的 图 按钮 ， 插 入 一 个 <div> 
标签 ， 用 于 控制 单条 数据 的 显示 。 编 辑 <div> 标 签 ， 添 加 style 样式 属性 padding-bottom， 设 
置 其 值 为 5 像素 。 将 光标 置 于 <div> 标 签 中 ， 单 击 【ASP.NET- 插 入 】 工 具 栏 中 的 【更 多 标 
签 】 按 钮 国 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASP.NET 标签 】|【Web 服务 器 
控件 】 分 类 中 的 asp:Image， 插 入 一 个 图 像 服务 器 控件 ， 设 置 其 ImageUrl 属性 的 值 为 <%# 
DataSetl.FieldValue("pic_addr", Container) %>，Width 属性 为 140。 同 时 ， 在 【属性 】 面 板 
中 设置 其 链接 属性 为 Viewphoto.aspx?id=<%# DataSetl.FieldValue("ID", Container) %>， 链 
接 目 标 为 _self， 如 图 9.32 所 示 。 

2 style="padding-bottom: 5px: “> 


ref= viewphoto. a3SPX ?Id=<%# 
target=" _ sa > asp: Inage ImageUr1=<W# DataSet1. Fieldyalue 人 DIE addr” 3 Eee %> 


Width="140”" runat="server” />C/a> 
/div> 


9.32 插入 图 像 


(7) 在 所 创建 的 图 像 链 接 之 后 ， 添 加 标签 <br>， 以 便 换行 。 然 后 ， 打 开 【 应 用 程序 】 
面板 组 ， 选 择 【 绑 定 】 面 板 ， 展 开 数据 集 DataSetl， 选 择 其 下 面 的 字段 PicName， 并 将 其 
拖 至 前 面 所 创建 的 图 像 链接 之 下 ， 以 绑 定 显示 相应 相片 的 名 称 。 这 样 ， 即 完成 了 单条 数据 
的 绑 定 。 

(8) 选 定 整个 <div> 标 签 ， 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 
击 因 按 钮 ， 从 弹出 的 菜单 中 选择 【重复 区 域 】 命 令 ， 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 选 
择 DataSetl 作为 重复 区 域 的 数据 集 ， 并 设置 所 有 记录 如 图 9.33 所 示 。 
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9.33 【重复 区 域 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 设置 。 此 时 ， 对 于 相关 相片 的 数据 绑 定 全 部 完成 。 

接 下 来 ， 实 现 相 片 信息 的 数据 绑 定 显示 。 

(9) 将 光标 移 至 EditRegion4 可 编辑 区 域 中 , 插入 一 个 6 行 3 列 的 表格 , 合并 第 1 列 的 
6 个 单元 格 ， 并 在 合并 的 单元 格 中 插入 一 个 Image 服务 器 控件 ， 在 其 他 单元 格 中 输入 相应 
的 文本 ， 如 图 9.34 所 示 。 


[ASP: INMAGE] 


9.34 插入 的 表格 


(10) 为 了 绑 定 相片 数 据 的 显示 ， 这 里 需要 创建 一 个 新 的 数据 集 。 

在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 曾 按钮 ， 从 弹出 的 菜单 
中 选择 【数据 集 】 命令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSet2， 连 
接 选 择 Cnn， 表 格 选择 PhotoInfo， 筛 选 条 件 设置 为 字段 ID 等 于 URL 参数 ID， 如 图 9.35 
所 示 。 


9.35 创建 数据 集 DataSet2 


(11) 为 了 在 返回 的 数据 中 包含 指定 相片 文件 的 完整 路 径 和 统计 其 留言 数 ， 需 要 对 SQL 
语句 进行 调整 。 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 在 数据 集 的 高 
级 模式 对 话 框 中 ， 修 改 SQL 语句 为 : 
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SELECT a.*, ('~/photo/'+picaddr) as Pic Addr, (select count (*) FROM PhotoLy 

WHERE photoid=a.id) as Nums from photoinfo a where a.id=? 

这 里 ,所 返回 的 字段 Pic_Addr 为 指定 相片 所 对 应 的 图 像 文 件 的 完整 路 径 , 而 字段 Nums 
则 为 指定 相片 的 留言 数 。 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 

(12) 返回 刚才 在 EditRegion4 可 编辑 区 域 所 添加 的 表格 ， 设 置 Image 控件 的 ImgUrl 属 
性 为 <%# DataSet2 FieldValue("pic_addr", Container) %>，Width 属性 为 250。 

(13) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 择 数 据 集 DataSet2， 并 将 其 
展开 。 拖 动 字 段 PicName 至 文本 “相片 名 称 ” 后 的 单元 格 中 ， 并 在 【属性 】 工 具 栏 中 设置 
该 动态 文本 的 字体 颜色 值 为 “#3399CC”， 加 粗 显 示 。 与 此 类 似 ， 依 次 拖 动 字段 Ddate、 
ClickNum、Nums 和 Descr 至 文本 “上 传 时 间 ”、“ 点 击 次 数 ”、“ 留 言 次 数 ”、“ 相 片 描 
述 ”后 的 单元 格 中 ， 并 为 其 设置 相应 的 字体 。 至 此 ， 指 定 相片 信息 的 数据 绑 定 完成 。 

接 下 来 ， 实 现 留 言 信息 的 数据 绑 定 显示 。 

(14) 在 【应 用 程序 】 面 板 组 中 ， 将 选项 切换 至 【服务 器 行为 】 面 板 ， 单 击 导 按钮， 从 
弹出 的 菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 数据 集 名 称 为 
DataSet3， 连 接 选 择 Cnn， 表 格 选择 PhotoLY， 筛 选 条 件 设置 为 字段 PhotoID 等 于 URL 参 
数 ID， 如 图 9.36 所 示 。 


图 9.36 创建 数据 集 DataSet3 


(15) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 这 里 创建 的 数据 集 所 返回 的 记录 为 指定 
相片 的 所 有 留言 信息 。 

下 面 ， 先 来 创建 单条 留言 信息 的 数据 绑 定 显示 。 

(16) 在 EditRegion4 可 编辑 区 域 中 , 再 次 插入 一 个 2 行 2 列 的 表格 , 将 第 1 行 的 背景 颜 
色 值 设置 为 “#CCC3F0”， 字 段 颜 色 值 设置 为 “ 手 FFFFF”， 然 后 在 第 1 行 的 第 1 个 单元 
格 中 输入 文本 “留言 人 : ”， 第 2 个 单元 格 中 输入 “留言 时 间 : ”， 并 将 第 2 个 单元 格 的 
水 平 对 齐 方式 设置 为 “ 右 对 齐 ”， 最 后 再 合并 第 2 行 的 两 个 单元 格 ， 如 图 9.37 所 示 。 


9.37 插入 表格 


a 
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(17) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 
择 数据 集 DataSet3， 并 将 其 展开 ， 如 图 9.38 所 示 。 

(18) 选择 字段 LYName 并 将 其 拖 动 至 文本 “留言 人 : ”之 四 于 Se 
后 ， 选 择 并 拖 动 字段 LYTime 至 文本 “留言 时 间 : ”之 后 ， 选 
择 并 拖 动 字段 LYContent 至 表格 第 2 行 的 单元 格 中 。 在 【应 用 
程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 其 中 显示 了 刚 
才 所 绑 定 的 动态 文本 。 双 击 “ 动 态 文本 (DataSet3.LYContent)”， 
在 弹出 的 【动态 文本 】 对 话 框 中 , 设置 其 格式 为 【编码 一 HTML 
编码 格式 】， 如 图 9.39 所 示 。 

单 击 【确定 】 按 钮 ， 完 成 单条 留言 数据 的 绑 定 显 示 。 

(19) 选 定 显示 单条 留言 信息 的 整个 表格 ， 在 【应 用 程序 】 EL 
面板 组 的 【服务 器 行为 】 面 板 中 ， 单 击 到 按钮 ， 从 弹出 的 菜单 辣 和 和 
中 选择 【重复 区 域 】 命 令 ， 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 
选择 DataSet3 作为 数据 集 ， 并 设置 显示 所 有 记录 ， 如 图 9.40 所 示 。 


田 苹 数据 集 Datasetl) 
田 辐 数据 集 DataSet2) 
日 苞 ” 数 据 集 DatsaSet3) 


多 ”PheteID 
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5 


田子 数据 集 DataSet1) 


田子 数据 集 DataSet2) 取消 
日 图 数据 集 DataSet3) | 
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F PhotolD 
LNen 
F UT 
4 中 
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fe: [Ou# Server MtmlEncode DataSet3.F: 


图 9.39 设置 动态 文本 格式 


重复 区 域 


取消 
显示 : 个 后 “证 有 


CS 所 有 记录 


图 9.40 设置 重复 区 域 
(20) 单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 设置 ， 同 时 也 完成 了 指定 相片 的 所 有 留言 信 
息 的 绑 定 。 
至 此 ， 页 面 仅 剩 下 发 表 留 言 的 功能 尚未 完成 ， 该 功能 将 在 9.2.4 节 中 介绍 。 此 时 ， 页 面 
预览 如 图 9.41 所 示 。 
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:这 趟 是 我 的 宝宝 很 可 委 吧 ? 


很 可 妥 的 宇 宝 , 阿 癌 


长 神 挺 好 的 ， 一 个 胖 小 子 ， 阿 呵 ? 


可 受审 证 9 


9.41 页面 预览 


9.2.4 ”发 表 留言 


这 里 ， 将 继续 完善 用 于 查看 相片 的 页 面 ViewPhoto.aspx， 添 加 发 表 留 言 的 功能 。 

在 EditRegion4 可 编辑 区 域 中 , 已 经 添加 了 一 个 用 于 显示 相片 信息 的 表格 和 一 个 用 于 显 
示 留 言 信息 的 Repeater 数据 控件 ( 即 重复 区 域 )。 这 里 ， 再 插入 一 个 表单 ， 并 在 【代码 】 视 
图 中 添加 其 Runat 属性 为 Server。 然 后 ， 在 表单 中 插入 一 个 4 行 2 列 的 表格 ， 表 格 属性 如 
图 9.42 所 示 。 


国策 于 和 RPR aa FE OF ®| 
= 习 边框 


到 区 高 [本 可 ”间距 5 
SEE 
到 到 到 RAE 80 


9.42 表格 属性 


分 别 合 并 表格 第 1 行 和 第 4 行 的 两 个 单元 格 ， 并 在 表格 中 添加 相应 的 文本 和 控件 ， 如 
9.43 所 示 。 


9.43 插入 表格 
图 中 ， 红 色 字 体 标记 了 各 控件 所 对 应 的 ID 名 称 。 其 中 ， 文 本 框 控件 LYR 的 初始 值 设 


:2 
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置 为 “匿名 ”; 文本 框 控件 LYNR 的 文本 模式 设置 为 【多 行 】， 行 数 为 6。 控 件 Requirel 
和 Require2 为 两 个 RequiredFieldValidator 验证 服务 器 控件 , 分 别 对 文本 框 LYNR 和 文本 框 
LYR 的 输入 进行 验证 ， 要 求 其 必须 输入 。 

此 外 ， 特 别 需 要 提 到 的 是 ,在 表格 中 添加 了 一 个 卫 为 PhotoID 的 隐藏 域 ， 其 取 值 设置 
为 <%# DataSet2.FieldValue("ID", Container) %>， 即 当前 相片 的 ID， 其 作用 在 于 ， 当 插入 记 
录 时 ， 可 以 从 该 隐藏 域 的 取 值 中 获取 当前 留言 所 针对 的 相片 ID。 

用 于 发 表 留 言 信息 的 表单 设计 完成 ， 下 面 通过 【服务 器 行为 】 面 板 中 的 【插入 记录 】 
命令 来 完成 数据 的 添加 。 

在 【服务 器 行为 】 面 板 中 ， 单 击 加 按钮 ， 从 弹出 的 菜单 中 选择 【插入 记录 】 命 令 ,， 此 
时 将 弹出 【插入 记录 】 对 话 框 ， 如 图 9.44 所 示 。 


和 ”。 可 
可 Ee ho) 


图 9.44 【插入 记录 】 对 话 框 
在 【插入 到 表格 】 下 拉 列 表 框 中 ， 选 择 数 据 表 PhotoLY， 然 后 分 别 设置 其 各 个 字段 的 
获取 值 。 对 于 字段 ID 和 字段 LYTime， 均 存在 默认 值 ， 此 处 无 须 设置 。 字 段 LYName、 
LYContent 和 PhotoID 的 获取 值 分 别 设置 为 表单 元 素 Lyr、Lynr 和 PhotoID 的 取 值 。 如 果 数 
据 插 入 成 功 ， 则 转向 首页 面 Default.aspx。 单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 的 设置 。 


最 后 ， 切 换 至 【代码 】 视 图 ， 添 加 页 面 的 Page_Load 事件 ， 该 事件 主要 用 于 在 数据 库 
中 对 指定 相片 的 点 击 次 数 执行 加 1 操作 ， 其 代码 如 下 : 
【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
Dim StrCnn Rs String 
Dim Strsql Rs String 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
If Not IsPostBack() Then 
"判断 页 面 参数 ID 是 否 为 空 
if request.QueryString("id")<>""” then 
"获取 数据 库 连 接 字 符 串 
strcnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING Cnn") 
Cnn = New OleDbConnection(strcnn) 
Cnn.open() 


"更 新 指定 相片 的 点 击 次 数 ， 其 值 在 原 值 基础 上 加 1 
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StrSql = "update photoinfo set clicknum=c1licknum+1l where id=" & 
request .Querystring ("id") 
Cmd = New OleDbCommand (Strsql, Cnn) 
Cmd.ExecuteNonQuery () 
Cnn.Close () “关闭 数据 库 连 接 
end if 
End If 
End Sub 


页 面 的 功能 设计 已 经 全 部 完成 ， 页 面 预览 如 图 9.45 所 示 。 


:这 哉 是 我 的 全 宝 ， 很 可 委 吧 9 


9 
长 和 插 好 的 ， 一 个 胖 小 子 ， 阿 呵 ? 


图 9.45 页 面 预览 
当 用 户 发 表 留 言 时 ， 也 许 会 发 现 一 个 问题 ， 即 当 在 留言 人 文本 框 中 不 输入 其 他 值 ， 而 
使 用 默认 值 “ 匿 名 ”时 ， 所 提交 的 数据 中 字段 LYName 的 值 为 空 。 这 是 由 于 在 插入 记录 时 ， 
Dreamweaver 没有 获取 到 文本 框 的 默认 值 。 解决 办 法 是 , 在 【代码 】 视 图 中 找到 <MM:Insert> 
标签 中 的 <Parameters> 子 项 下 的 参数 @LYName 的 定义 代码 , 设置 IF 函数 的 第 3 个 参数 ( 即 
当 表 单 变量 LYR 的 取 值 为 空 时 所 返回 的 值 ) 为 “匿名 ”， 如 图 9.46 所 示 。 


SSETEES 

Parameter Name=" ee Value=" <%# IIf((Request.Forn(“lynr") <> Nothing), Request.Forn(| 

“lynr’), "") %>” Type="WChar” | 
<Pal Nane="@LYNane” 人 se 《%# IIf ((Request.Form( 17r") <> Nothing), Request.Forn( 


“lyr”). %>” Type="WChar” 
Paraneter Nane="@PhotoID” ve 《后 IIf ((Request. Form(“PhotoID’) <> Nothing), Request.Forn 
(“PhotoID"), “*) %>’ Type="Integer” 

/Paraneters> 

/MM: Insert> 


9.46 修改 代码 
至 此 ， 整 个 网 络 相册 系统 的 前 台 功 能 全 部 设计 完成 。 
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9.3 后台 功能 实现 


在 网 络 相册 的 后 台 功 能 中 ， 主 要 包括 对 相片 分 类 、 相 片 信息 和 相片 的 留言 信息 进行 
管理 。 


9.3.1 构建 模板 页 


在 实现 后 台 功 能 之 前 ， 首 先 来 构建 后 台 页 面 的 模板 页 。 对 于 后 台 页 面 来 说 ， 其 页 面 结 
构 与 前 台 页 面 的 结构 类 似 ， 因 此 可 以 在 前 台 模板 的 基础 上 进行 调整 。 

打开 前 台 的 模板 文件 “前 台 模 板 .dwt.aspx”， 选 择 【 文 件 】| 【另存 为 模板 】 命 令 ， 在 
弹出 的 【另存 为 模板 】 对 话 框 中 ， 将 文件 名 设置 为 “后 台 模 板 ”， 如 图 9.47 所 示 。 


站 点 : [网 络 相册 | 


本 ”四 


人 属 和 帮助 00 


9.47 ”另存 为 模板 


单 击 【保存 】 按 钮 ， 即 可 将 前 台 模 板 另 存 为 后 台 模 板 。 

在 后 台 模 板 中 ， 首 先 将 页 面 上 方 的 图 片 文件 Top.gif 改 为 文件 Admin_Top.gif， 然 后 将 
图 片 下 的 文本 “后 台 管 理 ” 改 为 “返回 网 络 相册 主页 ”, 并 将 其 链接 更 改 为 “../Default.aspx”。 
同时 ,将 嵌 套 的 表格 Table2 的 第 1 单元 格 的 宽度 设置 为 130 像素 ， 第 2 个 单元 格 的 宽度 设 
置 为 650 像素 。 最 后 ,删除 页 面 左 边 的 可 编辑 区 域 EditRegion3, 并 将 可 编辑 区 域 EditRegion4 
的 起 始 标记 置 于 页 面 中 的 网 套 表 格 Table2 的 起 始 标记 之 前 ， 将 可 编辑 区 域 EditRegion4 的 
结束 标记 置 于 表格 Table2 的 结束 标记 之 后 。 也 就 是 说 ,整个 表格 Table2 将 置 于 可 编辑 区 域 
EditRegion4 之 内 ， 如 图 9.48 所 示 。 
页 面 的 左 侧 将 显示 后 台 的 功能 菜单 ， 而 右 侧 则 将 显示 相应 的 功能 操作 界面 。 

下 面 ， 将 在 模板 页 面 的 左 侧 添加 后 台 的 功能 菜单 。 这 里 ， 将 使 用 ASP.NET 2.0 中 新 增 
的 TreeView 控件 。 在 ASP.NET 1.x 中 ， 微 软 并 未 将 其 作为 ASP.NET 的 一 个 内 置 服务 器 控 
件 , 而 是 将 其 作为 一 个 附加 的 Web 控件 集 ( 即 Internet Explorer Web) 中 的 一 部 分 。 也 就 是 说 ， 
在 ASPNET 1.x 中 ， 如 果 需 要 使 用 TreeView 控件 ， 用 户 则 需 先 下 载 并 安装 IE Web 控件 ， 
然后 将 其 程序 集 复制 到 Bin 目录 下 ， 方 可 进行 操作 。 但 对 ASPNET 2.0 来 说 ， 则 不 存在 此 
问题 ， 它 已 作为 一 个 内 置 的 服务 器 控件 存在 。 

遗憾 的 是 ， 目 前 Dreamweaver 8 并 不 支持 对 ASPNET 2.0 的 可 视 化 操作 。 也 就 是 说 ， 
我 们 无 法 在 Dreamweaver 8 操作 界面 上 的 【ASPNET- 插 入 】 工 具 栏 中 可 视 化 地 拖 动 并 插入 
ASPNET 2.0 中 新 增 的 控件 。 这 也 是 Dreamweaver 8 针对 ASPNET 的 一 个 重大 缺陷 ， 但 相 
信 ，Dreamweaver 的 新 版 本 将 会 全 方位 地 提供 对 ASPNET 2.0 的 支持 。 
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; | 
上 

E | 
全 : 
: 
| 
| ] 


ay》 <table#tablel> Ctr> Gtd> [Ny Q aa vm sv Er7i 


9.48 ”后 台 模板 的 结构 


但 是 ， 不 要 忘记 Dreamweaver 从 本 质 上 来 说 仍 是 一 个 代码 编辑 器 ， 我 们 完全 可 以 在 其 
【代码 】 视 图 中 编写 代码 ， 而 无 须 在 【设计 】 视 图 中 进行 操作 ， 这 对 在 Dreamweaver 8 中 
处 理 ASP.NET 2.0 中 新 增 的 服务 器 控件 无 疑 是 一 个 最 简单 ， 也 最 直接 的 方法 。 只 是 ， 这 个 
方法 要 求 我 们 对 ASPNET 2.0 中 新 增 控 件 的 语法 非常 清楚 。 

接 下 来 ， 切 换 至 Dreamweaver【 代 码 】 视 图 ， 在 可 编辑 区 域 EditRegion4 的 起 始 标记 与 
表格 Table2 的 起 始 标记 之 间 添 加 表单 的 起 始 标记 <Form Id="form1" Runat="Server">， 然 后 
在 可 编辑 区 域 EditRegion4 的 结束 标记 与 表格 Table2 的 结束 标记 之 间 添 加 表单 的 结束 标记 
</Form>。 也 就 是 说 ， 将 整个 表格 Table2 置 于 表单 Form1l 中 ， 而 将 表单 Fomml 置 于 可 编辑 
区 域 EditRegion4 之 内 。 

然后 ， 在 表格 Table2 的 第 1 个 单元 格 中 输入 功能 菜单 的 相关 代码 ， 其 代码 如 下 : 


【示例 代码 】 
<asp:TreeView ID="TreeView2" runat="server" ExpandDepth="1" 
ShowLines="True" ForeColor="Black"> 
<Nodes> 
<!- 注 释 : 添加 父 结 点 “分 类 管理 ”， 并 设置 其 选择 操作 为 展开 --> 
<asp:TreeNode SelectRAction="Expand" Text=" 分 类 管理 "> 
<!- 注 释 : 添加 子 结 点 “添加 分 类 ”， 设 置 链接 为 “class_Add.aspx”--> 
<asp:TreeNode NavigateUrl="Class Add.aspx" Target=" self" Text=" 添 加 
分 类 "></asp:TreeNode> 
<!- 注 释 : 添加 子 结 点 “管理 分 类 ”， 设 置 链接 为 “class_RAdmin .aspx”--> 
<asp:TreeNode NavigateUrl="Class Admin.aspx" Target=" self" Text=" 管 
理 分 类 "></asp:TreeNode> 
</asp:TreeNode> 
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<!- 注 释 : 添加 父 结 点 “相册 管理 ”， 并 设置 其 选择 操作 为 展开 --> 
<asp:TreeNode SelectAction="Expand" Text=" 相 册 管 理 "> 
<!- 注 释 : 添加 子 结 点 “上 传 相片 ”， 设 置 链接 为 “Photo _Add.aspx”--> 
<asp:TreeNode NavigateUrl="Photo Add.aspx" Target=" self" Text=" 上 传 
相片 "></asp:TreeNode> 
<!- 注 释 : 添加 子 结 点 “管理 相片 ”， 设 置 链接 为 “Photo Add.aspx”--> 
<asp:TreeNode NavigateUrl="Photo Admin.aspx" Target=" self" Text=" 管 
理 相片 "></asp:TreeNode> 
</asp:TreeNode> 
</Nodes> 
</asp:TreeView> 


注意 ， 以 上 注释 仅 为 方便 读者 理解 代码 而 添加 的 。 在 实际 的 代码 中 ， 是 不 允许 在 
TreeView 控件 的 定义 代码 内 添加 注释 的 。 

切换 至 【设计 】 视 图 ， 可 以 发 现在 表格 table2 的 第 1 个 单元 格 中 仅 显示 了 湖 标 记 ， 而 
没有 正常 显示 出 所 定义 的 功能 菜单 ， 这 就 是 Dreamweaver 不 支持 对 ASP.NET 2.0 的 可 视 化 
操作 所 导致 的 。 但 是 , 在 浏览 器 中 访问 此 页 面 , 可 以 发 现 功能 菜单 能 够 正常 显示 , 如 图 9.49 
所 示 。 


ER 工具 D WWD) 
] + 有 -小 - 固 因 人 身 | 回收 天 测 拱 体 邹 
| 瑞士 (0) | 乱 httpiiocalhostjwexcjTemplates/ 后 全 模板 ,dwt,aspx 了 忆 秆 到 || 刍 接 | 


返回 网 络 相册 主页 
是 分 类 管理 
| 上 添加 分 类 
| [管理 分 类 
点 相册 管理 
|- 上 传 相片 
上 管理 相片 
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图 9.49 预览 后 台 模板 
至 此 ， 后 台 模 板 创建 完成 。 最 后 ， 有 些 读者 也 许 会 对 模板 的 设计 提出 疑问 ， 为 什么 可 
编辑 区 域 EditRegion4 要 包括 整个 表格 table2， 而 不 是 table2 的 第 2 个 单元 格 ， 按 理 说 功能 
菜单 也 应 属于 不 可 编辑 的 区 域 呀 ?以 下 几 点 也 许 能 帮助 大 家 解除 疑惑 。 
@ ” 当 使 用 【服务 器 行为 】 面 板 中 的 【插入 记录 】 和 【更 新 记录 】 命 令 时 ， 将 会 对 表 
单 Form 标记 进行 编辑 ， 这 意味 着 表单 只 能 存在 于 可 编辑 区 域 中 ， 和 否则 在 后 面 的 
功能 页 面 中 将 可 能 无 法 使 用 模板 。 
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@ TreeView 控件 必须 处 于 表单 Form 标签 之 内 , 且 该 Form 必须 带 有 “Runat="Server"” 
属性 。 
@ ”整个 页 面 只 能 有 一 个 Form 标签 。 
以 上 几 点 决定 了 可 编辑 区 域 EditRegion4 只 能 在 表单 Form 之 外 ， 而 表单 Form 又 必须 
包含 整个 表格 Table2。 这 就 是 ， 功 能 菜单 必须 处 于 可 编辑 区 域 之 内 的 原因 ， 尽 管 在 调用 该 
模板 的 后 台 功 能 页 面 中 并 不 会 对 其 进行 编辑 。 


9.3.2 ”后台 首页 


后 台 的 首页 相当 简单 ， 其 结构 与 模板 页 类 似 。 
它 并 不 提供 任何 的 功能 操作 ， 而 仅仅 是 起 一 个 中 间 
过 渡 的 作用 ， 其 对 应 的 文件 名 为 Admin.aspx。 

新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 
为 Admin.aspx。 选 择 【 修 改 】| 【模板 】|【 套 用 模板 
到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 
择 前 面 创建 的 【后 台 模 板 】， 如 图 9.50 所 示 。 图 9.50 【选择 模板 】 对 话 框 

单 击 【 选 定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

修改 页 面 标题 为 “后 台 管 理 ”， 将 光标 移 至 表格 table2 的 第 2 个 单元 格 中 ， 添 加 文本 
“请 选择 您 所 要 执行 的 操作 ”， 并 设置 其 水 平 对 齐 方式 为 “居中 对 齐 ”， 垂 直 对 齐 方式 为 
“顶端 ”。 

至 此 ， 后 台 首页 制作 完成 ， 页 面 预览 如 图 9.51 所 示 。 


电信 类 管理 请 好几 人 所 要 行 作 
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图 9.51 页 面 预览 
9.3.3 ”添加 分 类 
添加 分 类 主要 用 于 设置 相片 的 分 类 信息 ， 其 所 需 设置 的 信息 仅 包 括 分 类 名 称 。 
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新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Class Add.aspx。 选 择 【 修 改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【后 台 模 板 】， 将 模 
板 应 用 到 本 页 面 。 

修改 页 面 标题 为 “添加 分 类 ”， 然 后 在 表格 table2 的 第 2 个 单元 格 中 ， 添 加 功能 标题 
“添加 分 类 信息 ”和 文本 “分 类 名 称 : ”， 同 时 添加 一 个 文本 框 输入 控件 Name 和 一 个 提 
交 按 钮 控件 Add， 如 图 9.52 所 示 。 


分 类 名 称 ， [TASP:TERTBOR] 
漆 加 


DY Lol] > 4 Gomtinstance: editable) Cforn#fornl> CtableATable2> Ctr> Gay o> [WN | OQ foox ~ 


9.52 ”页面 设计 


为 了 保证 分 类 名 称 的 输入 不 为 空 ,还 须 在 [添加 了 按钮 下 插入 一 个 RequiredFieldValidator 
验证 控件 ， 其 属性 设置 如 图 9.53 所 示 。 


9.53 ”插入 RequiredFieldValidator 控件 


打开 【应 用 程序 】 面 板 组 ， 选 择 【 服 务 器 行为 】 面 板 ， 单 击 男 按 钮 ， 从 弹出 的 菜单 中 
选择 【插入 记录 】 命 令 ， 此 时 将 弹出 【插入 记录 】 对 话 框 ， 如 图 9.54 所 示 。 
在 【提交 值 ， 自 】 选 项 中 选择 form[0]， 在 【连接 】 选 项 中 选择 Cnn， 在 【插入 到 表格 】 


» 
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选项 中 选择 数据 表 Classmfo。 然 后 ， 在 【 列 】 列 表 杠 中， 设置 字段 ClassName 的 获取 值 为 
表单 元 素 name。 最 后 ， 设 置 提交 成 功 后 所 转向 的 页 面 为 本 页 面 ， 即 Class Add.aspx。 单 击 
【 确定】 按钮 ， 完 成 插入 记录 的 设置 。 


提交 和信” 自 :| er [0] 


出 


图 9.54 插入 记录 
至 此 ， 添 加 分 类 信息 的 页 面 制作 完成 ， 页 面 预览 如 图 9.55 所 示 。 
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返回 网 络 相册 主页 
局 分 类 管理 舌 加 分 类 信息 
添加 分 类 _ 
管理 分 类 分 类 名 称 : 
十 相 册 管理 
上 上传 相片 EE 


管理 相片 


图 9.55 页 面 预览 


9.3.4 ”管理 分 类 


管理 分 类 主要 用 于 对 相片 的 分 类 信息 进行 管理 ， 其 功能 包括 查询 相片 的 分 类 信息 、 编 
辑 或 删除 指定 的 相片 分 类 信息 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Class_Admin.aspx。 选 择 【 修 
改 】I 【模板 】|【 套 用 模板 到 页 】 命令 ,在 弹出 的 【选择 模板 】 对 话 框 中 选择 【后 台 模 板 】， 
将 模板 应 用 到 本 页 面 。 

修改 页 面 标题 为 “分 类 管理 ”， 然 后 在 表格 table2 的 第 2 个 单元 格 中 ， 添 加 功能 标题 


A 
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“分 类 管理 ”。 

接 下 来 将 通过 数据 网 格 ( 即 ASPNET 中 的 DataGrid 数据 控件 ) 来 显示 相片 的 分 类 信息 。 
在 此 之 前 ， 需 要 创建 一 个 数据 集 。 

(2) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 在 弹出 的 


菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSetl， 
连接 选择 Cnn， 表 格 选择 ClassInfo， 筛 选 条 件 为 “无 ”， 排 序 方式 选择 按 字 段 ID 进行 升序 


排序 ， 如 图 9.56 所 示 。 


图 9.56 创建 数据 集 DataSet1 


单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 
(3) 将 光标 置 于 功能 标题 之 下 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 轩 | 按钮， 在 弹出 的 菜 


单 中 选择 【数据 网 格 】 命 令 ， 此 时 将 弹出 【数据 网 格 】 对 话 框 ， 如 图 9.57 所 示 。 


9.57 ”数据 网 格 


设置 ID 为 DataGrid1， 数 据 集 选择 DataSetl1， 设置 一 次 显示 
10 条 记录 , 在 【导航 】 下 拉 列 表 框 中 选择 【编号 链接 到 每 一 页 】。 
单 击 【添加 列 】 按 钮 秘 ， 在 弹出 的 菜单 中 选择 【' 编 辑 '、' 更 新 


' 取 消 按 钮 】 命 令 ， 如 图 9.58 所 示 。 
在 弹出 的 【编辑 、 更 新 、 取 消 按钮 列 】 对 话 框 中 ,设置 【 标 图 958 关联 菜单 


题 】 为 “编辑 ”， 【按钮 类 型 】 为 “链接 按钮 ”，【 更 新 表格 】 
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为 Classmfo，【 主 键 】 为 IJD，【 提 交 为 】 为 Integer， 如 图 9.59 所 示 。 


图 9.59 【编辑 、 更 新 、 取 消 按钮 列 】 对 话 框 

单 击 【 确 定 】 按 钮 ， 完 成 编辑 列 的 添加 。 

(4) 再 次 单 击 【 添 加 列 】 按 钮 沈 ， 在 弹出 的 菜单 中 选择 【' 删 除 ' 按 钮 】， 在 弹出 的 【 删 
除 按钮 列 】 对 话 框 中 设置 【标题 】 为 “删除 ”，【 按 钮 类 型 】 选 择 “ 链 接 按 钮 ”，【 删 除 
】 为 ClassInfo， 【主键 】 为 [DD，【 提 交 为 】 为 mteger， 如 图 9.60 所 示 。 


图 9.60 【删除 按钮 列 】 对 话 杠 
单 击 【确定 】 按 钮 ， 完 成 删除 列 的 添加 。 


在 【 列 】 列 表 框 中 ， 选 择 ID 列 ， 单 击 【 编 辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 
话 框 中 ， 设 置 该 列 的 显示 标题 为 “分 类 编号 ”， 如 图 9.61 所 示 。 


9.61 设置 ID 列 的 属性 


(5) 然后 再 选择 ClassName 列 ， 单 击 【编辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 
话 框 中 ， 设 置 该 列 的 显示 标题 为 “分 类 名 称 ”， 同 时 取消 【只 读 】 复 选 框 的 选择 ， 各国 男友 
所 示 。 


简单 煞 笑 宇 入 列 x| 


ED 
cm 可 取消 
厂 只 读 帮助 
提交 为 : |varrchar 了 


9.62 设置 ClassName 列 的 属性 
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此 时 ， 在 数据 网 格 中 所 需 显示 的 各 项 列 均 设 置 完成 ， 如 图 9.63 所 示 。 


9.63 ”数据 网 格 中 列 的 设置 


(6) 单 击 【确定 】 按 钮 ， 完 成 数据 网 格 的 创建 。 这 时 ， 还 需 对 数据 网 格 的 显示 作 进 一 
步调 整 。 在 【设计 】 视 图 中 ,选择 所 创建 的 数据 网 格 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【 编 
辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 选 择 【 布 局 】 项 ， 设 置 【宽度 】 为 400 
像素 ，【 单 元 格 边 距 】 为 3，【 单 元 格 间距 】 为 0，【 边 框 宽度 】 为 1， 如 图 9.64 所 示 。 


标签 久生 器- DataGrid 


图 9.64 【标签 编辑 器 】 对 话 框 

单 击 【 确 定 】 按 钮 ， 完 成 对 数据 网 格 布局 的 设置 。 

至 此 ， 页 面 的 功能 设计 完成 ， 页 面 预览 如 图 9.65 所 示 。 

(7) 单 击 相应 分 类 的 【编辑 】 按 钮 ， 其 分 类 名 称 将 显示 为 一 个 文本 框 ， 同 时 【编辑 】 
按钮 也 变 为 【更 新 】 按 钮 和 【取消 】 按 钮 ， 如 图 9.66 所 示 。 

在 文本 输入 框 中 修改 分 类 名 称 ， 单 击 【 更 新 】 按 钮 ， 即 可 更 新 所 修改 的 记录 ， 并 返回 
初始 状态 ， 单 击 【 取 消 】 按 钮 ， 可 取消 更 新 操作 。 此 外 ， 单 击 【 删 除 】 按 钮 ， 可 删除 指定 
的 分 类 信息 。 
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返回 网 络 相册 主页 


局 分 类 管理 
| Hamss 
| 上 管理 分 类 
占 相 骨 管理 
|- 上 传 相片 
上 -管理 相片 


9.66 ”编辑 状态 


需要 说 明 的 是 ,必须 将 页 面 绑 定 的 PostBackBind 属性 设置 为 False( 如 图 9.67 所 示 ); 否 


则 ， 更 新 操作 无 法 正常 执行 。 


页 面 功能 已 经 基本 完成 ， 但 是 细心 的 读者 也 许 会 发 现 对 于 分 类 信息 的 删除 功能 仍 有 缺 
陷 ， 当 所 要 删除 的 分 类 下 存在 相片 信息 时 ， 该 分 类 应 该 不 允许 被 删除 ， 而 这 里 并 没有 进行 


判断 。 确 实 ， 这 里 删除 调 月 


的 是 Dreamweaver 8 中 默认 的 数据 集 DataSetl 的 


OnDataGridDelete 事件 ， 因 此 不 会 对 特殊 情况 进行 处 理 。 但 用 户 可 以 通过 自 定 义 的 事件 代 


码 来 实现 。 


(8) 在 【设计 】 视 图 中 , 选择 所 创建 的 数据 网 格 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【 编 
辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 选 择 【 事 件 】|OnItemCommand 分 类 ， 
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如 图 9.68 所 示 。 


<EditOps> 
<EditOpsTable Name="ClassInfo” /> 
<Parameter Name="ClassName” Type=" YarWChar” /> 
<Parameter Name="ID” Type="Integer” IsPrimary="true” /> 
/EditOps> /WM: Dat aSet> 
MMM: PageBind runat=" server"(PostBackBind="False™)/> 
<IDOCTYPE html PUBLIC “-//W3C//DTD XHTIL 1.0 Transitional//EN” 


9.67 ”修改 代码 


Datagrid - OnTteaCommand 


Dat aset 1. OnData5ridpelete 
将 其 修改 为 DataGridl_Mod 


OnAdcreated 
DaTtenCreated 


DaEaitCommand 
OnSortCommand 
OnPageIndexChanged 
OnCancelCommand 
OnPreRender 
OnDisposed 
OnDataBinding 
Onlinlosd 
OnDeleteCommand 
OnTtenDataBound 
OnLoad 
OnSelectedIndexCh. 


图 9.68 OnltemCommand 事件 


从 图 9.68 所 示 的 右边 的 列表 中 可 以 看 到 ，DataGrid 控件 默认 的 OnItemCommand 事件 
为 “DataSet1. OnDataGridDelete”, 将 其 修改 为 自 定义 的 事件 Datagridl Mod。 单 击 【 确 定 】 
按钮 ， 关 闭 对 话 框 。 

(9) 然后 ， 切 换 至 【代码 】 视 图 ， 添 加 事件 代码 ， 如 下 所 示 : 

【示例 代码 】 


<script language="vb" runat="server"> 
Sub DataGridl Mod(ByVal Sender As Object, ByVal E Rs 
DataGridCommandEventArgs) 
Dim codestr As String = E.Item.Cells (0) .Text “' 获 取 所 要 删除 的 分 类 ID 
Dim DataR As OleDbDataReader 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn As String 
Dim Sql As String 
If CType (e.CommandSource, LinkButton) .CommandName = "Delete" Then 
"获取 数据 库 连 接 字符 串 
StrCnn = System.Configuration.ConfigurationSsettings.AppSettings 
("MM CONNECTION STRING Cnn") 
"创建 数据 库 连接 


Cnn = New OleDbCconnection (StrCnn) 


“sale 
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Cnn.open() 

"查询 数据 库 中 是 否 存在 此 分 类 的 相片 信息 

Sql = "select * from photoinfo where classid=" & Trim(codestr) 

Cmd = New OleDbCommand (Sql, Cnn) 

DataR = Cmd.ExecuteReader() 

IE DataR.Read() Then 
' 存 在 此 分 类 下 的 相片 信息 ， 提 示 无 法 删除 
ClientScript.RegisterStartupScript (Me.GetType (), "",， GetInfo(" 该 分 


类 下 存在 相片 信息 ， 无 法 删除 ! ") ) 


Cnn.close() ' 关 闭 数据 库 连接 


Else 
' 不 存在 该 分 类 下 的 相片 信息 
DataR.Close () “' 关 闭 所 打开 的 oleDbDatareader 对 象 
"执行 删除 操作 
Sql = "delete from classinfo where id=" & codestr 


Cmd = New OleDbCommand (Sql, Cnn) 

Cmd .ExecuteNonQuery () 

Cnn.close() 

' 将 页 面 重 新 跳 转 至 本 页 面 ， 更 新 数据 的 显示 

Response.Redirect ("Class Admin.aspx") 
End If 


End If 
End Sub 
"定义 函数 GetInfo， 用 于 获取 格式 化 后 的 错误 提示 信息 
Function GetInfo (BYVal Strl As String) Rs String 
Dim Str2 As String 
Str2 = "<script language='javascript'>alert('" & strl & "')<" 
Str2 += "/" 
Str2 += "script>" 
Return Trim(Str2) 
End Function 


</script> 


以 上 代码 的 功能 是 ， 首 先 判断 数据 库 中 是 否 存在 指定 分 类 下 的 相片 信息 。 如 果 存 在 ， 
则 调用 ClientScript.RegisterStartupScript0) 方 法 提示 相应 的 错误 信息 , 其 中 所 提示 的 信息 通过 


自 定义 函数 GetInfo0 来 返回 格式 化 脚本 后 的 信息 ;如果 不 存在 指定 分 类 下 的 相片 信息 ， 则 


直接 将 其 删除 ， 并 重 定向 本 页 面 ， 更 新 数据 的 显示 。 


提示 : 在 此 页 面 中 ， 必 须 导入 命名 空间 System.Data 和 System.Data.OleDb。 


(10) 重新 预览 本 页 面 ， 当 删除 存在 相关 相片 的 分 类 时 ， 系 统 将 会 弹出 错误 提示 ， 取 消 
删除 操作 ， 如 图 9.69 所 示 。 
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至 此 ， 页 面 功 能 全 部 完成 。 从 这 里 也 可 以 看 出 ， 虽 然 Dreamweaver 8 提供 了 非常 快捷 
的 方式 来 对 数据 进行 操作 , 但 其 数据 库 行 为 只 能 提供 相对 简单 的 功能 (尽管 这 对 于 一 些 基本 
的 数据 操作 已 经 足够 了 )。 如 果 需 要 在 其 中 加 入 一 些 特殊 的 判断 或 功能 ， 则 仍 需 通过 代码 来 
实现 ， 这 就 要 求 我 们 对 ASP.NET 中 的 数据 控件 的 语法 有 足够 的 了 解 。 所 以 ， 请 读者 不 要 忘 
记 ，Dreamweaver 只 是 一 种 辅助 的 ASPNET 开发 工具 ， 掌 握 ASPNET 的 各 种 语法 才 是 最 
根本 的 。 


9.3.5 上传 相片 


现在 介绍 上 传 相片 功能 的 实现 。 在 此 功能 中 ， 除 了 上 传 指定 的 相片 外 ， 还 应 在 上 传 相 
片 之 前 提供 相片 预览 的 功能 ， 这 样 可 以 避免 上 传 错误 的 相片 。 

(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 Photo Add.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【后 台 模 板 】， 
将 模板 应 用 到 本 页 面 。 

(2) 修改 页 面 标题 为 “上 传 相 片 ”， 然 后 在 表格 table2 的 第 2 个 单元 格 中 ， 添 加 功能 
标题 “上 传 相 片 ”。 在 功能 标题 下 方 插入 一 个 4 行 4 列 的 表格 ， 在 其 中 添加 相应 的 文本 和 
控件 ， 并 在 表格 下 方 添加 一 个 Image 服务 器 控件 ， 如 图 9.70 所 示 。 


[ee 


rs 
ASP :LABE! 


{Labell] 
[ASP: INAGE}—{Inagel] 


9.70 界面 设计 


其 中 ，ID 名 为 FileUpload1 的 控件 为 ASPNET 2.0 中 新 增 的 FileUpload 服务 器 控件 ， 
该 控件 包含 一 个 文本 框 和 一 个 【浏览 】 按 钮 ， 它 主要 用 于 实现 文件 的 上 传 。 由 于 Dreamweaver 8 
对 ASPNET 2.0 可 视 化 操作 的 不 支持 ， 因 此 这 里 仅 显示 为 赐 标 记 。 该 控件 无 法 在 【设计 】 
视图 中 直接 插入 ， 而 只 能 在 【代码 】 视 图 中 编写 代码 ， 其 定义 代码 如 图 9.71 所 示 。 


《ID height="25" align=right style="padding-right:Spx;padding-top:5px; 
padding-bottom: 5px ;“》 选 择 相 片 ，</TD> 
< 


TD style="padding-left:5px” aligr=”"left” colspan=3> 
《asp:FiTeUpIoad ID="Filetploadl” runat="server™ ToolTip=" 和 笃 得 所 ” 
Width="400px” EnableTheming="True” />C/TD> 定义 FileUpload 服 务 器 控件 
TRS 
《ITR> 


9.71 定义 FileUpload 控件 


在 表格 的 第 4 行 添加 了 一 个 【预览 】 按 钮 。 其 作用 是 ， 在 上 传 文件 之 前 获取 文本 框 中 
的 文件 路 径 , 并 将 其 赋予 表格 下 方 的 Image 控件 的 ImageUr 属性 , 从 而 达到 预览 相片 的 目的 。 

但 是 ， 这 里 将 会 出 现 两 个 问题 。 

@ FileUpload 控件 并 没有 提供 相关 属性 可 以 获取 文本 框 中 的 文件 全 路 径 (注意 ， 是 文 
件 全 路 径 ， 而 不 是 文件 名 )。 


SR 
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@ 经 过 测试 发 现 ， 作 为 FileUpload 服务 器 控件 的 一 部 分 ， 其 文本 框 的 状态 没有 通过 
发 进行 保存 。 也 就 是 说 ， 当 数据 回 发 至 服务 器 时 ， 其 文本 框 的 值 将 会 丢失 ， 这 也 是 出 于 
一 种 安全 风险 的 考虑 。 在 这 种 情况 下 ， 如 果 【 预 览 】 按 钮 为 ASPNET 中 的 服务 器 控件 ， 则 
单 击 时 势必 会 导 至 数据 回 发 。 即 使 此 时 能 够 预览 相片 ， 其 文件 输入 框 中 的 值 也 会 清空 ， 用 
户 又 得 重新 选择 ， 这 会 给 用 户 的 操作 带 来 一 定 的 麻烦 。 

所 幸 的 是 ， 在 页 面 预览 后 ， 通 过 查看 源 文件 可 以 发 现 FileUpload 服务 器 控件 在 服务 器 
执行 后 将 转化 为 HTML 中 的 <Input type="File"> 标 签 ， 而 Image 服务 器 控件 也 将 转化 为 
HTML 中 的 <Img> 标 签 。 既 然 如 此 ， 那 完全 可 以 通过 JavaScript 脚本 来 获取 文本 框 的 值 并 将 
其 赋 给 <Img> 标 签 的 src 属性 ， 从 而 达到 预览 的 目的 。 

因此 , 这 里 所 添加 的 【预览 】 按 钮 并 非 ASPNET 中 的 Button 服务 器 控件 , 而 是 HTML 
中 的 <Input type="button"> 标 签 ， 如 图 9.72 所 示 。 


互 


《ID height="35” colspan="4” align=center> 
TInput type=" button” nane="preview value=" 拨 苑 ”coTCIICF= 
javascript: dispphoto() ;> 预览 按钮 

nbsp :gnbsp: énbsp: gnbsp: gnbsp:&nbsp: 

《asp:Button id="Add” runat="server” onclick="Save_Click” Width= 
“50px”Text=" 上 传 *>《/asp:Button> 1 
br /> 


9.72 【预览 】 按 钮 的 定义 代码 


在 【预览 】 按 钮 的 定义 中 ,设置 了 其 单 击 事件 为 JavaScript 脚本 函数 dispphoto()， 该 函 
数 的 定义 如 图 9.73 所 示 。 


<title> 上 传 相片 </titley> 


Cscript language=" javascript"》 
function dispphoto(){ 
证 (docunent. getElenentById(“FileUploadl”). value!="") 
{ 


document. getElenentById("Inagel”). style.width="200px“- 一 设置 Inage 控 件 的 图 像 宽 度 
docunent. getElenentById(" Inagel”). src=docunent. getElenentById(“Filelploadl”). value; 


取 文件 输入 框 的 值 并 将 其 奔 予 Inage 控 件 的 src 属 性 


Tseripty 
图 9.73 定义 dispphoto 函数 


这 样 ， 通 过 JavaScript 与 ASP.NET 的 结合 ， 轻 易 地 实现 了 预览 相片 的 功能 。 这 里 还 需 
说 明 的 是 ， 当 用 户 初次 加 载 页 面 时 ，Image 服务 器 控件 的 ImageUrl 属性 为 空 ， 不 显示 任何 
图 像 ， 为 了 达到 隐藏 的 目的 ， 在 定义 时 特意 将 其 Width 属性 设置 为 0。 因此， 这 里 在 预览 
相片 时 ， 必 须 在 dispphoto 脚本 函数 中 设置 Image 的 宽度 ， 和 否则 图 像 是 无 法 显示 的 。 

下 面 ， 再 来 看 看 相片 所 属 分 类 对 应 的 下 拉 列 表 控 件 PhotoClass 的 添加 。 该 控件 主要 用 
于 显示 相片 的 分 类 信息 ， 以 便 用 户 进行 选择 。 在 插入 该 控件 之 前 ， 需 要 创建 一 个 数据 集 ， 
以 便 绑 定数 据 的 显示 。 

G) 打开 【应 用 程序 】 面 板 组 ， 选 择 【 服 务 器 行为 】 面 板 ， 单 击 加 按钮 ， 在 弹出 的 菜 
单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 选 择 表 格 ClassInfo， 并 设置 排 
序 方式 为 按 字段 ID 升序 排序 ， 如 图 9.74 所 示 。 

单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 


“274。 
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9.74 创建 数据 集 DataSet1 


(4) 在 插入 DropDownList 控件 时 ， 在 弹出 的 【asp: 下 拉 列 表 】 对 话 框 中 ， 需 对 其 进行 
数据 绑 定 ， 如 图 9.75 所 示 。 


EEE x 
rr 
TL 取消 | 


图 9.75 创建 下 拉 列 表 控 件 


这 里 ， 数 据 集 选 择 前 面 所 创建 的 数据 集 DataSetl ， 获 取 标 签 选择 DataSetl 中 的 字段 
ClassName， 而 获取 值 则 选择 字段 ID。 

至 此 ， 页 面 的 界面 设计 及 数据 绑 定 基本 完成 。 最 后 ， 再 来 看 【上 传 】 按 钮 ， 其 操作 可 
分 为 两 步 : 首先 ， 上 传 选 定 的 相片 文件 至 指定 的 文件 夹 中 ; 然后 ， 将 相片 信息 保存 至 数据 
库 中 。 由 于 其 操作 不 仅仅 是 向 数据 库 中 插入 数据 ， 因 此 这 里 数据 的 提交 不 能 使 用 【服务 器 
行为 】 面 板 中 的 【插入 记录 】 命 令 ， 而 只 能 通过 代码 来 实现 。 

(5) 为 此 ， 定 义 【 上 传 】 按 钮 的 单 击 事件 为 Save_Click， 其 事件 代码 如 下 : 

【示例 代码 】 


Sub Save Click(ByVal Sender As Object, ByVal E As EventArgs) 
Dim Sql As String 
Dim Tag Rs Integer = 0 ' 定 义 变量 Tag， 用 于 标识 上 传 文件 是 否 成 功 
Dim NameStr As String = name.Text “，' 获 取 相片 名 称 信息 
Dim DescrStr As String Descr .Text “获取 相片 描述 信息 
Dim theClass As String photoclass.SelectedItem.Value “' 获 取 相 片 所 属 分 类 
Dim Pathstr As String 
Dim Errstr As String 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
"调用 FileUpload 控件 的 HasFile 方法 判断 用 户 是 否 选择 了 相片 文件 
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If FileUploadl.HasFile Then 
"用 户 选 择 了 文件 ， 开 始 上 传 
Try 
"设置 文件 上 传 的 目标 路 径 
PathStr = Server.MapPath ("data/data.mdb") 
Pathstr = Left (Pathstr, InstrRev (Trim(Pathstr), "\") - 1) 
Pathstr = Left (Pathstr, InstrRev (Trim(Pathstr), "\") - 1) 
Pathstr = PathStr & "\photo\" & FileUploadl.FileName 
FileUploadl1.SaveAs (PathStr) ' 执 行 上 传 操 作 
Catch ex As Exception 
"上 传 文件 失败 ， 提 示 错 误 信 息 ， 并 设置 变量 Tag 的 值 为 1 
ErrStr = "相片 上 传 失 败 : " & Replace (ex.Message.ToSstring, "/","//") 
Labell.Text = Trim(Errstr) 
Tag=1 
End Try 
If Tag = 0 Then 
' 变 量 Tag 等 于 0， 表示 文件 上 传 成 功 
StrCnn = System.Configuration.ConfigurationSsettings.AppSettings 
("MM_CONNECTION_STRING_Cnn") “' 获 取 数 据 库 连 接 字 符 串 
Cnn = New OleDbconnection (StrCnn) 
Cnn.open () 
' 向 数据 表 PhotoInfo 中 插入 所 上 传 的 相片 信息 
Sql = "insert into photoinfo (picaddr,picname,classid,descr) values('" 
& Trim(FileUploadl .FileName) & "','" & Trim(NameStr) & "'," & Trim(theClass) 
& ",'" & Trim(DescrStr) & "')" 
Cmd = New OleDbCommand (sql, Cnn) 
Cmd.ExecuteNonQuery () 
' 提 示 成 功 信息 
Clientscript.Registerstartupscript (Me.GetType (), "", GetInfo(" 相 片上 
传 成 功 ! ") ) 
Cnn.Close() 


name .Text = "" ' 清 空 相片 名 称 文本 框 
Descr.Text = "" “清空 相片 描述 文本 框 
End If 
End If 
End Sub 


在 以 上 代码 中 ， 首 先 调用 FileUpload 控件 的 HasFile0 方 法 判断 用 户 是 否 选择 了 相片 文 
件 。 如 果 没 有 选择 ， 则 不 执行 任何 操作 ; 如果 选择 了 所 要 上 传 的 相片 文件 ， 则 先 执行 文件 
的 上 传 操作 ， 并 通过 错误 控制 来 判断 文件 是 否 上 传 成 功 。 如 果 上 传 成 功 ， 则 进一步 将 相片 
言 息 保存 至 数据 库 中 ， 并 提示 相应 的 成 功 信 息 ， 否 则 ， 显 示 文 件 上 传 失败 的 错误 信息 ， 不 
再 执行 任何 操作 。 

至 此 ， 上 传 相片 页 面 的 功能 全 部 完成 ， 页 面 预览 如 图 9.76 所 示 。 

单 击 【浏览 】 按 钮 ， 可 在 本 地 磁盘 中 选择 相片 文件 。 选 择 文件 后 ， 单 击 【 预 览 】 按 钮 ， 
则 可 在 下 方 预览 用 户 所 选择 的 相片 ， 如 图 9.77 所 示 。 


二 富生 二 
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9.76 页面 预览 


上 JR 二 加 日 全 | 本 pm RC 
上 二 让 [ 轿 ntpypocshosjweciphoto_Add aspx 


相片 名 称 : 
过 择 相 片 : 下、\ 昌 上 \ 要 的 要 女 \ 胡 窜 1\1013\26 jpe 


相片 描述 : 


9.77 相片 预览 


可 以 发 现 ， 通 过 JavaScript 脚本 来 实现 相片 的 预览 ， 可 以 提高 相片 预览 的 速度 。 因 为 
它 是 在 客户 端 执行 ， 而 无 须 经 过 与 服务 器 的 交互 。 事 实 上 ， 在 使 用 ASPNET 开发 Web 程 
序 时 ， 当 与 服务 器 的 交互 过 多 而 导致 程序 的 响应 较 慢 时 ， 均 可 考虑 采用 JavaScript 脚本 来 
替代 ASP.NET 中 的 某 些 服 务 器 行为 。 
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9.3.6 ”管理 相片 


管理 相片 页 面 主要 用 于 对 相片 的 基本 信息 进行 管理 ， 其 功能 包括 相片 信息 的 查询 、 预 
览 、 编 辑 和 删除 等 。 同 时 ， 还 应 提供 对 指定 相片 的 留言 信息 进行 管理 的 相关 链接 。 

(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 Photo Admin.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 后 台 模 板 】， 
将 模板 应 用 到 本 页 面 。 

修改 页 面 标题 为 “相片 管理 ”， 然 后 在 表格 table2 的 第 2 个 单元 格 中 ， 添 加 功能 标题 
“相片 管理 ”。 

接 下 来 ， 将 通过 数据 网 格 ( 即 DataGrid 控件 ) 来 显示 相片 的 分 类 信息 。 在 此 之 前 ， 需 要 
创建 一 个 绑 定 数据 显示 的 数据 集 。 

(2) 打开 【服务 器 行为 】 面 板 ， 单 击 到 按钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 ， 
如 图 9.78 所 示 。 


田 类 ”预存 过 程 


图 9.78 创建 数据 集 DataSet1 
设置 数据 集 名 称 为 DataSet1， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 如 下 SQL 语句 : 


SELECT photoinfo.id,picname,classname,ddate, clicknum FROM 

photoinfo, classinfo WHERE classid=classinfo.id ORDER BY photoinfo.id 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 

(3) 将 光标 置 于 功能 标题 之 下 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 居 按钮 ， 从 弹出 的 菜 
单 中 选择 【数据 网 格 】 命 令 ， 在 弹出 的 【数据 网 格 】 对 话 框 中 ,设置 人 D 为 DataGrid1， 选 
择 数据 集 DataSet1， 设 置 一 次 显示 10 条 记录 ， 从 【导航 】 下 拉 列 表 中 选择 【编号 链接 到 每 
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一 页 】， 如 图 9.79 所 示 。 


图 9.79 【数据 网 格 】 对 话 杠 


(4) 单 击 【 添 加 列 】 按 钮 党 ， 从 弹出 的 菜单 中 选择 【' 编 辑 、' 更 新 '、' 取 消 ' 按 钮 命令 ， 
在 弹出 的 【编辑 、 更 新 、 取 消 按钮 列 】 对 话 框 中 ,设置 【标题 】 为 “编辑 ”，【 按 钮 类 型 】 
为 【链接 按钮 】，【 更 新 表格 】 为 PhotoInfo， 【主键 】 为 DD，【 提 交 为 】 为 Integer， 如 
9.80 所 示 。 


简单 数据 字段 列 


图 9.80 【编辑 、 更 新 、 取 消 按 钮 列 】 对 话 框 
单 击 【确定 】 按 钮 ， 完 成 编辑 列 的 添加 。 
(5) 再 次 单 击 【添加 列 】 按 钮 著 ， 从 弹出 的 菜单 中 选择 【' 删 除 入 钮 】， 在 弹出 的 【 删 
除 按钮 列 】 对 话 框 中 设置 【标题 】 为 “删除 ”，【 按 钮 类 型 】 为 【链接 按钮 】，【 更 新 表 
格 】 为 PhotoInfo， 【主键 】 为 ID，【 提 交 为 】 为 Integer， 如 图 9.81 所 示 。 


EE 


图 9.81 【删除 按钮 列 】 对 话 框 
单 击 【 确 定 】 按 钮 ， 完 成 删除 列 的 添加 。 
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(6) 在 【 列 】 列 表 框 中 , 选择 ID 列 ， 单 击 【编辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 
对 话 框 中 设置 该 列 的 显示 标题 为 “相片 编号 ”， 如 图 9.82 所 示 。 


简单 数 掺 字段 列 x 


9.82 设置 ID 列 的 属性 


选择 PicName 列 ， 单 击 【编辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 设置 该 
列 的 显示 标题 为 “相片 名 称 ”， 同 时 取消 【只 读 】 复 选 框 的 选择 ， 如 图 9.83 所 示 。 


简单 数据 宇 稻 列 X| 


图 9.83 设置 PicName 列 的 属性 


选择 ClassName 列 ， 单 击 【编辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 设置 
该 列 的 显示 标题 为 “所 属 分 类 ”， 如 图 9.84 所 示 。 


简单 煞 医 字段 列 | 


图 9.84 设置 ClassName 列 的 属性 


选择 DDate 列 ， 单 击 【 编 辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 设置 该 列 
的 显示 标题 为 “上 传 时 间 ”， 如 图 9.85 所 示 。 


简单 数据 字段 列 x| 


图 9.85 设置 DDate 列 的 属性 
选择 ClickNum 列 ， 单 击 【 编 辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 设置 
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该 列 的 显示 标题 为 “点 击 次 数 ”， 如 图 9.86 所 示 。 

(7) 字段 的 属性 设置 完成 ， 接 下 来 添加 “管理 留言 ”的 链接 。 单 击 【添加 列 】 按 钮 获 ， 
从 弹出 的 菜单 中 选择 【超级 链接 】 命 令 ， 在 弹出 的 【超级 链接 列 】 对 话 框 中 ， 设 置 显示 标 
题 为 “管理 留言 ”， 在 【超级 链接 文本 】 选 项 组 中 设置 静态 文本 为 “管理 留言 ”， 在 【 链 
接 页 】 选 项 组 中 设置 数据 字段 为 il， 并 设置 【格式 字符 串 】 选 项 为 
“photo ly admin.aspx?id={0}”， 如 图 9.87 所 示 。 


图 9.87 ”添加 超级 链接 列 


(8) 单 击 【确定 】 按 钮 ， 完 成 超级 链接 列 的 添加 。 
此 时 ， 在 数据 网 格 中 所 需 显示 的 各 项 列 均 设置 完成 ， 如 图 9.88 所 示 。 


图 9.88 数据 网 格 中 列 的 设置 


单 击 【确定 】 按 钮 ， 完 成 数据 网 格 的 初步 创建 。 
事实 上 ， 在 数据 网 格 中 还 需 添加 一 个 按钮 列 ， 即 【预览 】 列 。 为 什么 没有 在 以 上 的 可 
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视 化 操作 中 进行 添加 呢 ? 这 是 由 于 在 Dreamweaver 8 的 数据 网 络 中 ， 不 支持 可 视 化 地 添加 
按钮 列 (在 添加 列 的 选项 中 ， 可 以 看 见 并 无 “按钮 列 ” 一 项 )。 因 此 ， 只 能 在 代码 中 进行 手 
动 添加 。 

(9) 切换 至 【代码 】 视 图 ， 定 位 到 DataGrid 控件 的 定义 代码 中 ， 在 【删除 】 列 和 【 管 
理 留言 】 列 中 添加 【预览 】 列 的 代码 ， 如 图 9.89 所 示 。 


《asp:ButtonColumm 
ButtonType="LinkButton” 
CommandNane="Delete” 
HeaderText=”“ 删 除 ” 
Text= “删除 ” 
Visible="True"/> 
Casp: ButtonColunn 
ButtonType="LinkButton” 
ConmandNane=" ViewPhoto” ae 
HeaderText=“ 预 鉴 ” 插入 “预览 " 列 
Text=" 预 览 ” 
Visible="True”/> 
《asp:HyperLirkColummn DataNavigateUrlField="id” 
DataNavigatelrlFormatString="photo_ly_adnin. aspx?id= {0}” 
Visible="True” 
HeaderText=" 管 理 留言 ” 
Text=" 管 理 留言 "/> 
/Colums> 


图 9.89 添加 【预览 】 列 的 代码 


(10) 对 数据 网 格 的 显示 作 进 一 步调 整 。 在 【设计 】 视 图 中 ， 选 择 所 创建 的 数据 网 格 并 
右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 选 
择 【 布 局 】 分类, 设置 其 宽度 为 620 像素 ,单元 格 边 距 为 3， 单 元 格 间 距 为 0, 边框 宽度 为 1。 

(11) 在 数据 网 格 的 下 方 插入 一 个 ID 为 Imagel 的 Image 服务 器 控件 ， 用 于 预览 相片 。 
选择 该 控件 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命令， 在 弹出 的 【标签 编辑 器 】 
对 话 框 中 设置 【布局 】 项 下 的 宽度 值 为 200 像素 ， 同 时 取消 【样式 信息 】 项 下 的 【可 见 】 
复 选 框 。 即 在 用 户 单 击 【预览 】 按 钮 之 前 ， 该 Image 控件 为 隐藏 状态 ， 当 用 户 单 击 【 预 览 】 
按钮 时 ， 再 将 其 显示 。 

(12) 来 看 一 下 数据 网 格 中 各 种 功能 按钮 的 事件 。 对 于 编辑 和 管理 留言 的 操作 ， 均 可 采 
其 默认 的 行为 而 无 须 更 改 ， 对 于 删除 操作 ， 如 果 采 用 数据 网 格 所 提供 的 默认 行为 ， 则 仅 
是 删除 相片 信息 。 但 是 ， 为 了 保证 数据 的 完整 性 ， 在 删除 相片 信息 的 同时 还 应 删除 该 相片 
的 所 有 留言 信息 。 因 此 ， 需 要 手动 设置 删除 操作 的 事件 代码 。 而 对 于 预览 操作 ， 其 按钮 列 
为 手动 添加 , Dreamweaver 8 的 数据 网 格 设置 中 并 无 其 相应 的 默认 行为 , 需要 手动 添加 其 相 
关 的 事件 。 

在 Dreamweaver 8 所 提供 的 数据 网 格 的 标签 编辑 器 中 ， 提 供 了 数据 网 格 的 各 种 事件 。 
其 中 ，【 删除】 按钮 列 的 操作 所 对 应 的 默认 事件 为 OnItemCommand， 而 【预览 】 按 钮 列 的 
执行 操作 必须 设置 在 OnPreRender 事件 中 。 事 实 上 ， 包 括 【 删 除 】 列 在 内 的 所 有 按钮 列 的 
操作 均 会 触发 OnPreRender 事件 ， 且 其 顺序 在 OnItemCommand 事件 之 前 。 因 此 ， 完 全 可 
以 删除 在 【删除 】 按 钮 列 所 对 应 的 默认 事件 OnItemCommand 中 定义 的 操作 ， 而 在 
OnPreRender 事件 中 添加 自 定义 的 事件 代码 ， 同 时 处 理 【 删 除 】 列 和 【预览 】 列 的 操作 。 


提示 : 在 标签 编辑 器 中 所 列 的 事件 与 实际 在 代码 中 所 生成 的 DataGrid 事件 并 不 一 致 ， 例 如 
标签 编辑 器 中 的 OnItemCommand 事件 在 代码 中 变 为 OnDeleteCommand 事件 ， 而 编 
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辑 器 中 的 OnPreRender 事件 在 代码 中 又 变 为 OnItemCommand 事件 ， 这 是 
Dreamweaver 8 在 处 理 数据 网 络 时 的 一 个 Bug。 最 终 ， 应 以 代码 中 的 事件 为 准 。 


(13) 将 视图 切换 至 【设计 】 视 图 ， 选 择 所 创建 的 数据 网 格 并 右 圭 
中 选择 【编辑 标签 ] 命 令 , 在 弹出 的 【标签 编辑 器 】 对 话 框 中 , 选择 【 事 


将 其 默认 的 习 


fF， 从 弹出 的 快捷 菜单 


件 〗〗OnItemCommand 


攻 件 名 DataSetl. OnDataGridDelete 删除 ;选择 【事件 】 


添加 自 定义 的 事件 DataGridl Mod， 如 图 9.90 所 示 。 
案 规 


(14) 单 


Datwirid - DaPregRender 


OnPreRender， 在 其 


二 总 ridi_Wod 


图 9.90 添加 OnPreRender 事件 


DataGrid1 Mod 事件 代码 ， 如 下 所 示 : 


【示例 代码 】 
Sub DataGridl Mod (BYVal Sender As Object，ByVal E As 
DataGridCommandEventArgs) 


"获取 当前 所 要 操作 的 相片 ID 


Dim c 
Dim D 
Dim C 


odestr As String = E.Item.Cells(0).Text 
ataR As OleDbDataReader 
nn As OleDbConnection 


Dim Cmd As OleDbCommand 


Dim S 


trCnn As String 


Dim Sql As String 

"获取 数据 库 连 接 字 符 串 

StzCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING Cnn") 


' 根 据 触 发 当前 事件 的 按钮 列 的 commandName 属性 ， 判 断 应 执行 何 种 操作 


I£ CP 


ype (e.CommandSource, LinkButton) .CommandName = 


"CommandName 属性 为 “Delete”， 执 行 删除 操作 


Cnn 


= New OleDbConnection (StrCnn) 


Cnn.open () 


"删除 指定 相片 的 留言 信息 


"Delete” Then 


hb 


fF【 确 定 】 按 钮 ， 完 成 数据 网 格 的 事件 设置 。 切 换 至 【代码 】 视 图 ， 添 加 
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Sql = "delete from photoly where photoid=" & trim(codestr) 
Cmd = New OleDbCommand (Sql, Cnn) 
Cmd .ExecuteNonQuery () 
"删除 指定 的 相片 信息 
Sql="delete from photoinfo where id=" & trim(codestr) 
Cmd=New OleDbCommand (Sql, Cnn) 
Cmd .ExecuteNonQuery () 
cnn.Close() “关闭 数据 库 连 接 
"页 面 跳 转 至 本 页 面 ， 刷 新 数据 的 显示 
Response.Redirect ("Photo Admin.aspx") 
Else If CType (e.CommandSource, LinkButton) .CommandName = "ViewPhoto" Then 
"CommandName 属性 为 “ViewPhoto”， 执 行 预览 操作 
"查询 所 要 预览 的 相片 的 图 像 路 径 和 相片 名 称 
Sql="Select picname, ('~/photo/'+picaddr) as pic addr from photoinfo 


where id=" & Trim(codestr) 


Cnn = New OleDbConnection(strcnn) 
cnn.open () “打开 数据 库 连 接 
Cmd=New OleDbCommand (Sql, Cnn) 
DataR=Cmd .ExecuteReader () 
If DataR.Read() Then 
' 设 置 Image 控件 的 ImageUrl 属性 
Imagel.ImageUrl = DataR("pic addr") 
' 设 置 Image 控件 的 AlternateText 属性 
Imagel.AlternateText = DataR("picname") 


' 将 Image 控件 置 为 可 见 
Imagel .Visible = True 
End if 
cnn.Close() “关闭 数据 库 连接 
End If 
End Sub 


在 DataGridl Mod 事件 中 , 首先 依据 CType(e.CommandSource, LinkButton) 获 取 触 发 事 
件 的 源 ， 并 将 其 转化 为 LinkButton 类 型 ， 然 后 获取 其 CommandName 属性 ， 并 依据 该 属性 
值 来 判断 所 要 执行 的 操作 。 当 CommandName 属性 值 为 Delete 时 ， 表 示 触 发 事件 的 按钮 为 
【删除 】 按 钮 ， 应 执行 删除 相片 信息 操作 ， 当 CommandName 属性 值 为 ViewPhoto 时 ， 表 
示 触 发 事件 的 按钮 为 【预览 】 按 钮 ， 应 执行 预览 相片 操作 。 

至 此 ， 管 理 相片 的 页 面 功 能 全 部 完成 ， 页 面 预览 如 图 9.91 所 示 。 

单 击 【编辑 】 按 钮 ， 可 对 指定 相片 的 相片 名 称 信息 进行 编辑 ， 此 时 【相片 名 称 】 栏 将 
显示 为 文本 框 ， 而 【编辑 】 按 钮 也 将 改变 为 【更 新 】 和 【取消 】 按 钮 ; 单 击 【 删 除 】 按 钮 ， 
则 可 删除 指定 的 相片 信息 ; 单 击 【 预 览 】 按 钮 ， 可 在 数据 网 格 的 下 方 显示 该 相片 的 图 像 ， 
如 图 9.92 所 示 。 

对 于 “管理 留言 ”功能 ， 这 里 仅 是 创建 了 一 个 目标 页 面 为 Photo LY_Admin.aspx 的 链 
接 ， 该 页 面 的 功能 实现 将 在 下 一 节 进 行 介绍 。 


提示 : 


在 此 页 面 中 ， 必 须 导 入 命名 空间 System.Data 和 System.Data.OleDb。 
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图 9.92 相片 预览 


9.4 相册 留言 管理 


本 节 讲 解 相片 留言 信息 的 管理 功能 的 实现 方法 ， 在 该 管理 功能 中 ， 首 先 提供 对 指定 相 
片 的 留言 信息 的 浏览 ， 然 后 在 此 基础 上 提供 对 留言 的 删除 功能 。 

新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 Photo LY_Admin.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 后 台 模 板 】， 
将 模板 应 用 到 本 页 面 。 同 时 ， 将 页 面 标题 设置 为 “留言 管理 ”。 

在 页 面 结构 的 设计 上 ， 本 页 面 与 查看 相片 功能 的 页 面 结构 较为 相似 ， 两 者 均 包括 相片 
信息 显示 和 留言 信息 浏览 两 部 分 。 不 同 的 是 ， 本 页 面 在 显示 相片 信息 的 表格 中 将 添加 【 删 
除 所 有 留言 】 按 钮 ， 而 在 留言 信息 浏览 中 将 针对 每 条 留言 添加 【删除 】 按 钮 。 

(1) 首先 ， 来 看 相片 信息 的 显示 。 在 表格 table2 的 第 2 个 单元 格 中 ， 插 入 一 个 6 行 3 
列 的 表格 ， 合 并 第 1 列 的 6 个 单元 格 ， 并 在 合并 的 单元 格 中 插入 一 个 Image 服务 器 控件 ， 
设置 其 宽度 为 250， 同 时 在 其 单元 格 中 输入 相应 的 文本 ， 并 在 第 5 行 的 第 2 列 中 插入 按钮 
控件 ， 如 图 9.93 所 示 。 
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删除 所 有 留言 


其 中 ， 相 片 名 称 、 上 传 时 间 、 点 击 次 数 、 相 片 描述 以 及 Image 控件 的 ImageUrl 属性 均 
需 绑 定 动态 文本 。 在 此 之 前 ， 需 要 创建 一 个 数据 集 。 

(2) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 轩 按钮， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【 高 级 】 按 钮 ， 切 换 
至 数据 集 的 高 级 模式 。 在 高 级 模式 下 ， 单 击 【 添 加 参数 】 按 钮 而 ， 在 弹出 的 【编辑 参数 】 
对 话 框 中 ， 设 置 参 数 名 称 为 “@ID”， 类 型 为 Integer， 如 图 9.94 所 示 。 


编辑 参数 | 


Sm — we | 
类 型 : |Integer "| 取消 
本 到 得 助 | 
到 
建立 | 


图 9.94 【编辑 参数 】 对 话 框 
单 击 【 建 立 】 按 钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 参 数 的 值 为 URL 参数 外 ， 
如 图 9.95 所 示 。 


生成 值 


x| 
2 
源 [EL3R 可 取消 | 
ER 和 | 


图 9.95 【生成 值 】 对 话 杠 
(3) 单 击 【确定 】 按 钮 ， 返 回 【 数 据 集 】 对 话 框 。 设 置 数据 集 名 称 为 DataSetl ， 连 接 
为 Cnn, 同时 在 SQL 文本 框 中 输入 以 下 SQL 语句 : SELECT *,(~/photon+picaddn as pic_addr from 


photoinfo where id=?， 如 图 9.96 所 示 。 
单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 此 数据 集 将 根据 页 面 参数 ID 的 值 ， 返 回 对 应 


的 相片 信息 。 其 中 ， 字 段 Pic_Addr 表示 相片 所 对 应 的 图 像 路 径 。 
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图 9.96 创建 数据 集 DataSet1 


(4) 打开 【 绑 定 】 面 板 ， 选 择 数据 集 DataSet1， 并 将 其 展 
开 ， 如 图 9.97 所 示 。 

拖 动 字段 PiceName 至 文本 “相片 名 称 ” 后 的 单元 格 中 ， 
并 在 【属性 】 工 具 栏 中 设置 该 动态 文本 的 字体 颜色 值 为 
“#3399CC”， 加 粗 显 示 。 与 此 类 似 ， 依 次 拖 动 字段 DDate、 Es 
ClickNum、Descr 至 文本 “上 传 时 间 ”、“ 点 击 次 数 ”、“ 相 Ce 
片 描 述 ” 后 的 单元 格 中 ， 并 设置 其 相应 的 字体 属性 。 同 时 ， 设 Be 
置 Image 控件 的 ImageUrl 属 性 的 值 为 <%# DataSetl.FieldValue Ee 
("pic_addr", Container) %>, 从 而 完成 指定 相片 信息 的 数据 绑 定 
(5) 选择 【删除 所 有 留言 】 按 钮 并 右 击 ， 从 弹出 的 快捷 菜 图 9.97 【 绑 定 】 面 板 
单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 杠 
中 ， 选 择 【 事 件 】|OnClick 事件 ， 在 右 侧 的 文本 框 中 输入 DelAll_Click， 如 图 9.98 所 示 。 

此 操作 是 设置 当 单 击 【 删 除 所 有 留言 】 按钮 时 所 执行 的 事件 , 其 事件 代码 将 在 后 面 讲述 。 

接 下 来 ， 实 现 留 言 信 息 的 【浏览 】 按 钮 及 【删除 】 按 钮 的 添加 。 

cE 


9.98 ”设置 按钮 的 OnClick 事件 
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(6) 创建 绑 定 显示 留言 信息 的 数据 集 。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行 
为 】 面 板 ， 单 击 国 按 钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 
框 中 ， 设 置 数据 集 名 称 为 DataSet2， 连 接 选 择 Cnn， 表 格 选择 PhotoLY， 筛 选 条 件 设 置 为 
字段 PhotoID 等 于 URL 参数 ID， 如 图 9.99 所 示 。 


pe 


质 呈 本 后 一 一 
如 果 失 败 , 则 转 到 : 政 一 浏览.. 
。 失败 时 显示 调试 信息 


图 9.99 创建 数据 集 DataSet2 

(7) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 这 里 创建 的 数据 集 所 返回 的 记录 为 指定 
相片 的 所 有 留言 信息 。 

下 面 创建 单条 留言 信息 的 数据 绑 定 显示 。 

(8) 在 相片 信息 表格 的 下 方 ， 再 次 插入 一 个 2 行 3 列 的 表格 ， 将 第 1 行 的 背景 色 值 设 
置 为 #0000FF, 字段 颜色 值 设 置 为 杆 FFFFF, 然后 在 第 1 行 的 第 1 个 单元 格 中 输入 留言 人 : ”， 
第 2 个 单元 格 中 输入 “留言 时 间 : ”， 第 3 个 单元 格 中 插入 【删除 】 按 钮 控件 ， 最 后 再 合 
并 第 2 行 的 3 个 单元 格 ， 如 图 9.100 所 示 。 


留言 时 间 : 


图 9.100 插入 表格 


其 中 ， 在 插入 【删除 】 按 钮 时 ， 设 置 其 ID 为 Button1， 文 本 为 “删除 ”， 命 令 名 称 为 
DelLy， 命 令 参 数 为 <%# DataSet2.FieldValue("ID", Container) %>， 如 图 9.101 所 示 。 

(9) 在 【代码 】 视 图 中 ,添加 Button 控件 的 OnCommand 属性 为 Del_Click， 即 单 击 按 
钮 的 执行 事件 。 

(10) 打开 【 绑 定 】 面 板 ， 选 择 数据 集 DataSet2， 并 将 其 展开 ， 如 图 9.102 所 示 。 

(11) 选择 字段 LYName 并 将 其 拖 至 文本 “留言 人 : ”之 后 ， 选 择 并 拖 动 字段 LYTime 
至 文本 “留言 时 间 : ”之 后 ， 选 择 并 拖 动 字 段 LYContent 至 表格 第 2 行 的 单元 格 中 。 同 时 
在 【服务 器 行为 】 面 板 中 选择 并 双击 其 中 的 “动态 文本 (DataSet2.LYContent)”， 在 弹出 的 
动态 文本 】 对 话 框 中 ， 设 置 其 格式 为 【编码 -HTML 编码 格式 】， 如 图 9.103 所 示 。 
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图 9.101 插入 【删除 】 按 钮 


[ss Saver HiniEncede ataSet2. 7 | 


图 9.102 【 绑 定 】 面 板 图 9.103 设置 动态 文本 格式 


单 击 【 确 定 】 按 钮 ， 完 成 单条 留言 数据 的 绑 定 显示 。 

(12) 选 定 显示 留言 信息 的 整个 表格 ， 在 【服务 器 行为 】 面 板 中 单 击 因 按 钮 ， 在 弹出 的 
快捷 菜单 中 选择 【重复 区 域 】 命 令 ， 在 弹出 的 【重复 区 域 】 对 话 框 中 选择 DataSet2 作为 数 
据 集 ， 设 置 显 示 所 有 记录 ， 如 图 9.104 所 示 。 


重复 区 域 


图 9.104 设置 重复 区 域 


单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 设置 。 

至 此 ， 留 言 信息 的 浏览 数据 绑 定 完成 了 ， 剩 下 的 工作 就 是 实现 【删除 】 按 钮 的 单 击 
操作 。 

(13) 首先 ， 来 看 一 下 【删除 所 有 留言 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 
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【示例 代码 】 
Sub DelAll Click(BYVal Sender As Object，ByVal E As EventArgs) 

Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim StrCnn Rs String 

Dim Sql As String 

"获取 当前 显示 留言 的 相片 ID 

Dim PhotoId as string=request.QueryString("id") 

"获取 数据 库 连 接 字符 串 

StrCnn = 
System.Configuration.ConfigurationSettings.RPPSettings ("MM CONNECTION ST 
RING Cnn") 

Cnn = New OleDbConnection (StrCnn) 

Cnn.Open () 

"删除 指定 相片 下 的 所 有 留言 信息 

Sql="Delete from photoly where photoid=" & trim(photoid) 

cmd=new OleDbCommand (sql,cnn) 

Cmd .ExecuteNonquery () 

cnn.close () ' 关 闭 数据 库 连接 

' 重 定向 本 页 面 

Response.Redirect ("photo ly admin.aspx?id=" & request.Querystring("id")) 

End Sub 


当 单 击 【 删 除 所 有 留言 】 按 钮 时 ， 将 删除 当前 相片 下 的 所 有 留言 信息 ， 并 将 页 面 重 定 
向 本 页 面 ， 刷 新 数据 的 显示 。 
再 来 看 一 下 【删除 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 


【示例 代码 】 
Sub Del Click(Byval Sender As Object ,Byval E As CommandEventArgs) 

Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim StrCnn Rs String 

Dim Sql As String 

"获取 所 要 删除 的 留言 ID 

Dim theID as String=E.CommandArgument 

"获取 连接 数据 库 字 符 串 

StrCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM_CONNECTION_ST 
RING_Cnn") 

Cnn = New OleDbCconnection (StrCnn) 

cnn.Open () 

"删除 指定 的 留言 信息 

Sr Delete from photoly where id=" & trim(theid) 

cmd=new OleDbCommand(sql,cnn) 

Cmd .ExecuteNonquery () 

Cnn.close() 

' 重 定向 本 页 面 

Response.Redirect ("photo ly admin.aspx?id=" & 
request .Querystring ("id")) 
End sub 
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在 定义 【删除 】 按钮 时 , 设置 了 按钮 的 CommandArgument 属性 为 绑 定 数据 集 DataSet2 
中 的 字段 ID 的 值 ， 即 留言 信息 所 对 应 的 ID 值 。 因 此 ， 这 里 可 通过 E.CommandArgument 
来 获取 所 要 删除 的 留言 信息 ID， 并 执行 删除 操作 。 
需要 注意 的 是 ， 由 于 【删除 】 按 钮 处 于 Repeater 数据 控件 之 中 ， 因 此 这 里 必须 取消 页 
面 的 事件 验证 ， 和 否则 在 ASPNET 2.0 下 运行 此 页 面 将 会 导致 页 面 异常 ， 如 图 9.105 所 示 。 


NO Page Tanguagec Wh” Contentiype= "text/htnl™ ResponseEncodine- "eb2312™ 
FEnableEventValidation= false’%> 

<W@ Register TagPrefix="IO” Nanespace="DreanweaverCtrls” Assenbly= 
“DreanweaverCtrls, version=1. 0. 0. 0, publicKeyToker=836f606ede05d46a, culture=neutral 
” %> 


图 9.105 ”取消 页 面 的 事件 验证 
至 此 ， 留 言 管理 页 面 的 功能 全 部 完成 ， 页 面 预览 效果 如 图 9.106 所 示 。 


图 9.106 ”页面 预览 效果 


9.5 习 题 


(1) 在 查看 相片 功能 中 ， 进 一 步 提供 对 相片 的 放大 功能 ， 即 单 击 相片 ， 打 开 一 个 单独 
的 页 面 ， 以 原 尺寸 显示 该 图 像 。 

(2) 在 对 相片 留言 的 管理 功能 中 ， 提 供 对 相片 留言 的 屏蔽 功能 和 回复 功能 。 前 者 ， 不 
删除 留言 ， 仅 屏蔽 不 让 其 显示 ; 后 者 ， 允 许 管理 员 对 他 人 的 留言 进行 回复 。 

(3) 了 解 在 ASP.NET 中 对 文件 的 相关 操作 , 在 删除 相片 的 功能 中 同时 删除 相片 所 对 应 
的 文件 。 
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随 着 互联 网 的 发 展 ， 同 学 录 也 逐渐 成 为 很 多 用 户 上 网 必 去 的 一 个 居所 。 同 学 录 是 一 个 
建立 在 同学 用 户 基础 上 的 虚拟 社区 ， 它 以 班级 或 学 校 为 单位 ， 将 众多 的 人 聚集 在 一 起 。 它 
针对 曾经 是 学 生 或 目前 仍 是 学 生 的 人 ， 提 供 了 一 个 与 同窗 好 友 交 流 的 平台 。 在 同学 录 中 ， 
能 够 查询 老 同学 目前 的 情况 ， 也 能 够 与 同学 进行 相互 交流 、 沟 通 ， 重 忆 过 去 的 校园 生涯 。 

本 章 将 介绍 如 何 通过 ASPNET 来 构建 一 个 属于 自己 的 同学 录 。 


10.1 系统 分 析 


10.1.1 系统 功能 

1. 用 户 管理 

在 同学 录 中 ， 用 户 是 以 同学 的 身份 存在 ， 他 又 属于 自己 的 学 校 和 班级 。 因 此 ， 用 户 只 
有 注册 并 登录 后 ， 才 能 正常 访问 同学 录 系 统 。 在 用 户 管理 中 ， 包 括 用 户 注册 、 用 户 登 录 、 
找 回 密 码 以 及 修改 个 人 资料 等 功能 ， 其 实现 原理 与 第 8 章 中 介绍 的 会 员 管理 中 的 相应 功能 
基本 相同 。 


2. 班级 留言 
在 用 户 所属 的 班级 中 ， 人 允许 浏览 班级 中 其 他 同学 的 所 有 留言 信息 并 发 表 自 己 的 留言 。 
3. 班级 相册 


在 用 户 所 属 的 班级 中 ， 可 浏览 班级 中 其 他 同学 上 传 的 相片 。 针 对 具体 的 相片 ， 可 查看 
并 发 表 相应 的 评论 。 同 时 ， 用 户 也 可 上 传 自己 的 相片 。 


4. 班级 通讯 录 


在 用 户 所 属 的 班级 中 ， 可 浏览 班级 其 他 同学 的 通讯 录 ， 其 数据 来 源 取 自 各 位 同学 的 注 
册 信 息 。 


5. 班级 管理 


对 于 每 一 个 班级 ， 允 许 存在 一 个 班级 管理 员 。 班 级 管理 员 可 对 班级 的 所 有 成 员 进 行 管 
理 ， 包 括 通过 成 员 的 加 入 ， 或 将 其 踢 出 班级 。 如 果 某 班级 尚 无 管理 员 ， 其 任何 一 个 成 员 均 
可 申请 担任 班级 的 管理 员 。 在 申请 管理 员 之 后 ， 其 状态 处 于 待定 。 一 旦 班级 其 他 成 员 有 一 
半 以 上 的 人 同意 该 申请 ， 则 申请 者 正式 成 为 该 班级 的 管理 员 ， 可 行使 其 相应 的 权力 。 而 一 
旦 班级 其 他 成 员 有 一 半 以 上 的 人 均 不 同意 该 申请 ， 则 此 次 申请 失败 ， 其 他 成 员 可 继续 申请 
担任 该 班级 的 管理 员 。 
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6. 搜索 学 校 /班级 

可 通过 学 校 名 称 、 学 校 类 型 、 
击 相应 的 学 校 ， 可 查看 该 校 下 面 所 有 注册 的 班级 信息 。 
定 班级 。 如 果 未 能 搜索 到 相应 的 学 校 ， 


己 所 在 的 班级 ， 用 户 可 注册 新 的 班级 。 
7. 搜索 同学 
过 姓名 可 在 整个 同学 录 内 搜索 同学 信息 


10.1.2 ”数据 库 的 建立 


所 属 省 份 等 条 件 来 搜索 相应 的 学 校 。 


用 户 可 注册 新 的 学 校 。 如 果 在 指定 的 学 校 下 ， 


i 


在 搜索 结果 中 ， 单 
用 户 可 申请 加 入 查找 到 的 指 
没有 


同时 ， 


本 系统 使 用 Microsoft Access 2000 类 型 的 数据 库 ， 其 数据 库 的 文件 名 为 DataMdb， 在 


该 数据 库 中 添加 了 ClassInfo( 班 级 基本 信息 表 )、LYInfo( 班 级 留言 信 


表 )、PhotoInfo( 班 级 


相片 信息 表 )、Photo_PL( 相 片 评论 信息 表 )、SchoolInfo( 学 校 基 本 信息 表 )、Sys_Province( 省 
份 参数 信息 表 )、UserClass( 用 户 班级 关联 表 ) 和 UserSheet( 用 户 信 息 表 )8 个 数据 表 。 


1. 班级 基本 信息 表 (ClassInfo) 
ClassInfo 数据 表 主 要 用 于 存储 班级 的 基本 信息 ， 


其 表 结 构 见 表 10.1。 


表 10.1 Classinfo 数据 表 


字段 名 
D 
ClassName 文本 班级 名 称 
Grade 年 级 
SchoolID Cr 
createDate 
AdminUser 班级 管理 员 所 对 应 的 了 D 
SHTag 班级 管理 员 的 状态 标志 


字段 大 小 默认 值 | 主键 
长 整 型 B 
50 
Now0 
1 '0' 


说 明 : 字段 CreateDate 的 默认 值 为 系统 函数 Now()， 该 函数 用 于 获取 系统 的 当前 时 间 。 字 
段 SchoolID 表示 班级 所 属 的 学 校 编号 ， 该 字段 与 SchoolInfo 数据 表 中 的 字段 ID 相 
关联 。 字 段 AdminUser 表示 管理 员 所 对 应 的 用 户 编号 ， 该 字段 与 UserSheet 数据 表 


中 的 字段 Code 相关 联 。 字 段 SHTag 表示 管理 员 的 状态 标志 


， 其 值 为 0 表示 尚 无 管 


理 员 ， 为 1 表示 已 有 人 申请 管理 员 但 未 名 经 过 半数 以 上 班级 成 员 的 同意 ， 为 2 表示 已 


有 管理 员 且 申请 成 功 。 


2. 班级 留言 信息 表 (LYInfo) 
LYInfo 数据 表 主 要 用 于 存储 班级 留言 的 基本 信息 ， 


其 表 结 构 见 表 10.2。 
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表 10.2 LYInfo 数据 表 


字段 名 数据 类 型 字段 描述 字段 大 小 默 i 主键 
TheNo 自动 编号 留言 编号 长 整 型 
UserID 数字 发 表 留 言 的 用 户 编号 
ClassID 数字 对 应 的 班级 编号 
Title 文本 留言 标题 
Content 文本 留言 内 容 
TTime 日 期 /时 间 留言 时 间 


说 明 : 字段 UserID 表示 发 表 留 言 的 用 户 编号 ， 该 字段 与 UserSheet 数据 表 中 的 字段 Code 
相关 联 。 字 段 ClassID 表示 发 表 留 言 对 应 的 班级 编号 ， 该 字段 与 ClassInfo 数据 表 中 


的 字段 ID 相关 联 。 


3. 班级 相片 信息 表 (PhotoInfo) 
PhotoInfo 数据 表 主 要 用 于 存储 班级 相片 的 基本 信息 ， 其 表 结 构 见 表 10.3。 


字段 名 数据 类 型 
ID 自动 编号 


UpUser 数字 上 传 用 户 编号 | 
ClassCode 数字 相片 对 应 的 班级 编号 | | 
PhotoAddr 。 | 文本 相片 地 址 ji00 | 


表 10.3 Photolnfo 数据 表 


PhotoName 文本 相片 名 称 
ClickNum 数字 点 击 次 数 0 
UpDate 日 期 /时 间 相片 上 传 时 间 Now0 


说 明 : 字段 UpUser 表示 上 传 相 片 的 用 户 编号 ， 该 字段 与 UserSheet 数据 表 中 的 字段 Code 
相关 联 。 字 段 ClassCode 表示 上 传 相片 所 对 应 的 班级 编号 ， 该 字段 与 ClassInfo 数据 
表 中 的 字段 ID 相关 联 。 字 段 PhotoAddr 表示 相片 地 址 ,这 里 仅 存储 相片 文件 的 文件 
名 ， 其 文件 路 径 默认 为 系统 目录 下 的 Photo 子 目录 。 


4. 相片 评论 信息 表 (Photo_LY) 
Photo_LY 数据 表 主 要 用 于 存储 班级 相片 的 评论 信息 ， 其 表 结 构 见 表 10.4。 
学 校 基 本 信息 表 (SchoolInfo) 


SchoolInfo 数据 表 主 要 上 


于 存储 学 校 的 基本 信息 ， 其 表 结 构 见 表 10.5。 


“294 。 


第 10 章 ， 同学 录 “295。 


表 10.4 Photo_PL 数据 表 


字段 名 | 数据 类 型 字段 描述 主键 
D 自动 编号 | 相片 评论 编号 
PhotoID 数字 | 相片 编号 
PL User 数字 发 表 评 论 的 用 户 编号 
PLDate 日 期 /时间 ”| 评论 时 间 


Pl Content 备注 评论 内 容 


说 明 : 字段 PhotoID 表示 评论 所 针对 的 相片 编号 ， 该 字段 与 PhotoInfo 数据 表 中 的 字段 ID 
相关 联 。 字 段 PL User 表示 发 表 评论 的 用 户 编号 ， 该 字段 与 UserSheet 数据 表 中 的 字 
段 Code 相关 联 。 


表 10.5 _ Schoollnfo 数据 表 


字段 名 数据 类 型 字段 描述 主键 
ID 自动 编号 学 校 编号 长 整 型 
SchoolName 
provinee WR | | | 
Ts I | | 
CreateDate 日 期 /时 间 | oa 站 | je | 


6. 省 份 参数 信息 表 (Sys_Province) 
Sys_Province 数据 表 主 要 用 于 存储 各 省 份 的 相关 参数 信息 ， 其 表 结 构 见 表 10.6。 


表 10.6 Sys_Province 数据 表 


字段 名 数据 类 型 字段 描述 主键 
ID 自动 编号 省 份 编号 P 


provinee ht 和 |% | | 


7. 用 户 班 级 关联 信息 表 (UserClass) 


UserClass 数据 表 主 要 用 于 存储 用 户 与 班级 的 关联 信息 ， 其 表 结 构 见 表 10.7。 


表 10.7 UserClass 数据 表 


字段 名 字段 描述 字段 大 小 
UserCode 数字 用 户 编号 ” 
ClassCode 数字 班级 编号 
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数据 类 型 字段 描述 字段 大 小 
InTime 日 期 /时 间 加 入 时 间 | Now0 
文本 批复 班级 申请 标志 


说 明 : 字段 UserCode 表示 关联 的 用 户 编号 ， 该 字段 与 UserSheet 数据 表 中 的 字段 Code 相 
关联 。 字段 ClassCode 表示 关联 的 班级 编号 ， 该 字段 与 ClassInfo 数据 表 中 的 字段 ID 
相关 联 。 在 本 表 中 ， 字 段 UserCode 和 字段 ClassCode 合 为 主键 。 


8. 用 户 基本 信息 表 (UserSheet) 
UserSheet 数据 表 主 要 用 于 存储 用 户 的 基本 信息 ， 其 表 结 构 见 表 10.8。 


表 10.8 UserSheet 数据 表 


字段 名 数据 类 型 字段 描述 字段 大 小 | 默认 值 | 主键 
Code 自动 编号 用 户 编号 长 整 型 
LoginName 文本 用 户 的 登录 名 称 50 p 
UserPass 文本 用 户 的 登录 密码 50 
UserName 文本 用 户 的 真实 名 称 50 
Birth 日 期 /时 间 出 生日 期 
Email 文本 Bp 箱 地 址 100 
PassQuestion 文本 密码 提示 问题 100 
PassAnswer 文本 密码 提示 问题 的 答案 100 
Address 文本 联系 地 址 100 
Tell 文本 恬 系 的 固定 电话 50 
Tel2 文本 恬 系 的 移动 电话 50 
Works 文本 用 户 的 工作 单位 100 
ZipCode 文本 政 编码 50 
Sex 文本 用 户 性 别 50 
JHTag 文本 账号 是 否 激活 标识 | 0 
LastLogin 日 期 /时 间 上 次 登录 时 间 
CurrLogin 日 期 /时 间 本 次 登录 时 间 
Nums 数字 登录 次 数 0 


10.1.3 ”站 点 设置 
本 例 中 ， 站 点 设置 的 本 地 信息 如 图 10.1 所 示 。 
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图 10.1 本 地 信息 


其 中 ， 站 点 名 称 设置 为 “同学 录 ”， 本 地 根 文件 夹 设置 为 同学 录 系 统 所 在 的 磁盘 目录 ， 
默认 图 像 文件 夹 则 设置 为 同学 录 系 统 下 的 Image 目录 ，HTTP 地 址 设置 为 
“http://localhost/tx1”( 在 此 之 前 ， 需 将 网 络 相 册 系 统 设置 为 Web 共享 ， 并 设置 其 共享 名 为 
txD。 

站 点 设置 中 ， 远 程 信息 设置 如 图 10.2 所 示 。 


图 10.2 远程 信息 


由 于 对 同学 录 系 统 的 设计 、 测 试 和 运行 均 是 在 本 机 上 操作 的 ， 因 此 这 里 将 访问 方式 设 
置 为 【本 地 /网 络 】， 而 远 端 文件 夹 则 与 本 地 根 文件 夹 设置 为 相同 的 目录 。 


sa 
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站 点 设置 时 ， 测 试 服务 器 设置 如 图 10.3 所 示 。 


同学 录 的 站 点 定义 为 


图 10.3 测试 服务 器 
对 于 站 点 的 部 署 ， 请 参考 本 书 第 7 章 ， 这 里 不 再 獒 述 。 


10.2 构建 框架 


10.2.1 创建 模板 


在 实现 同学 录 的 各 项 功能 之 前 ， 先 创建 一 个 基本 的 页 面 模板 。 
(1) 选择 【文件 】|【 新 建 】 命 令 ， 在 弹出 的 【新 建文 档 】 对 话 框 中 ， 选 择 【模板 页 】| 
【ASPNET VB 模板 】， 如 图 10.4 所 示 。 单 击 【创建 】 按 钮 ， 新 建 一 个 模板 页 。 


图 10.4 【新 建文 档 】 对 话 框 


(2) 导入 外 部 样式 表 。 打开 CSS 面板 , 右 击 , 在 弹出 的 快捷 菜单 中 选择 【附加 样式 表 】 
命令 ， 此 时 将 弹出 【链接 外 部 样式 表 】 对 话 框 ， 如 图 10.5 所 示 。 


-I 


图 10.5 【链接 外 部 样式 表 】 对 话 框 
(3) 单 击 【 浏 览 】 按 钮 ， 选 择 系统 目录 中 的 CSS 文件 夹 下 的 Main.css 文件 ， 设 置 添加 
方式 为 【链接 】。 单 击 【 确 定 】 按 钮 ， 完 成 样式 表 的 附加 。 
(4) 切换 至 【设计 】 视 图 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【页 面 属性 】 命 令 。 在 弹 


出 的 【页 面 属性 】 对 话 框 的 【外 观 】 分 类 下 ， 设 置 页 面 的 上 边 距 为 0， 如 图 10.6 所 示 。 单 
击 【 确 定 】 按 钮 后 ， 就 完成 了 页 面 设置 。 


分 类 外 观 
MF BU |z| 
gp 2 me | | 


文本 照 色 0D; 三” 

背 最 闫 色 B): [FI ，， 

背景 图 像 [): | 
EW 本 


左边 距 旭 : 厂 ” [WE 了 2: 站 [RE 可 
Em 


[se ww | enw | ww | 


图 10.6 【页 面 属性 】 对 话 框 


(5) 选择 【插入 】| 【表格 】 命 令 ， 在 页 面 上 插入 一 个 2 行 1 列 的 表格 table1， 其 属性 
设置 如 图 10.7 所 示 。 


图 囊 a 大 EE 宽 fe0 [卫衣 可。 类 dE Es| | 
Pol rT 圳 ho 了 间距 0 边框 


到 到 到 REC wm 
到 列 到 WAESD 9 


图 10.7 表格 属性 


(6) 在 表格 tablel 的 第 1 行 中 ， 插 入 一 个 图 片 ， 其 源 文件 设置 为 Image 文件 夹 下 的 
Title.gif; 将 光标 置 于 第 2 行 中 ， 选 择 【 插 入 】|【 模 板 对 象 】|【 可 编辑 区 域 】 命 令 ， 此 时 
将 弹出 【新 建 可 编辑 区 域 】 对 话 框 ， 如 图 10.8 所 示 。 


5 we | 
以 在 基于 该 醒 板 的 文档 | 
ER 


帮助 


图 10.8 【新 建 可 编辑 区 域 】 对 话 框 
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(7) 设置 名 称 为 EditRegion1， 单 击 【 确 定 】 按 钮 ， 完 成 可 编辑 区 域 的 设置 。 同 时 ， 在 
可 编辑 区 域 中 插入 一 个 表单 Form， 并 设置 其 Runat 属性 为 Server， 此 时 的 页 面 如 图 10.9 


所 示 。 


图 10.9 页 面 设计 
(8) 选择 【文件 】I【 保 存 】 命令 , 将 模板 命名 为 “页 面 模板 ”， 并 加 以 保存 ， 如 图 10.10 
所 示 。 此 时 ， 系 统 会 自动 在 同学 录 的 系统 目录 下 新 建 一 个 名 为 Templates 的 文件 夹 ， 并 在 
其 中 生成 一 个 名 为 “页 面 模板 .dwt.aspx” 的 页 面 文件 ， 这 就 是 刚才 所 创建 的 模板 。 


a | 


图 10.10 保存 模板 
至 此 ， 模 板 创建 完成 ， 可 编辑 区 域 EditRegionl 即 为 在 其 他 页 面 添加 相关 功能 的 区 域 。 


10.2.2 用户 登录 

用 户 登 录 是 用 户 进入 同学 录 系 统 的 首页 面 ， 其 主要 功能 是 验证 用 户 的 合法 身份 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 , 将 其 命名 为 eg 选择 【修改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 前 面 创建 的 模板 “页 
面 模板 ”， 如 图 10.11 所 示 。 

EE > 


站 点 全): [同学 录 J 六 证 _] 


模板 上 DO) | 取消 


屎 当 模板 改变 时 更 新 页 面 Q) 帮助 


10.11 选择 模板 


单 击 【确定 】 按 钮 ， 将 模板 应 用 到 本 页 面 ， 并 将 页 面 标题 设置 为 “用 户 登 录 ”。 
(2) 在 可 编辑 区 域 EditRegionl 中 的 表单 Form 中 插入 一 个 5 行 2 列 的 表格 ， 表 格 属性 
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的 设置 如 图 10.12 所 示 。 


FE 表格 十 | © 
| [ua 可 刘 2 “高” ”| 可 as En 
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10.12 表格 属性 


(3) 在 表格 中 ， 插 入 相应 的 文本 、 文 本 框 控件 、 按 钮 控件 以 及 RequiredFieldValidator 
验证 控件 等 。 这 里 ， 采 用 了 与 第 8 章 中 的 会 员 管理 类 似 的 登录 页 面 ， 如 图 10.13 所 示 。 


用 户 登录 


态 记 密码 | 


10.13 界面 设计 


对 于 表格 中 的 各 种 控件 元 素 的 定义 ， 读 者 可 参考 8.3.1 小 节 。 

为 了 验证 用 户 输入 的 登录 名 称 和 登录 密码 的 正确 性 ， 下 面 将 创建 一 个 数据 集 。 

(4) 打开 【服务 器 行为 】 面 板 ， 单 击 型 按钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 ， 
将 弹出 【数据 集 】 对 话 框 ， 如 图 10.14 所 示 。 


SF 
| mw 

囊 格 ; [vsersheet - | 
Wo 2m © we -又 一 
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10.14 【数据 集 】 对 话 杠 


设置 数据 集 名 称 为 DataSetl ， 数 据 库 连 接 选 择 Cnn， 在 【表格 】 下 拉 列 表 框 中 选择 
UserSheet， 设 置 筛选 条 件 为 字段 LoginName 等 于 表单 变量 theName。 单 击 【 高 级 】 按 钮 ， 
将 对 话 框 切 换 至 高 级 模式 ， 以 便 添 加 一 个 筛选 条 件 ， 判 断 密码 的 正确 性 。 

(5) 在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 【 添 加 参数 】 按 钮 启 ]， 添 加 一 个 新 的 参 
数 ， 并 设置 参数 的 名 称 为 “@Pass”， 其 类 型 为 “VarChar”， 其 参数 值 为 表单 变量 thePwd 


的 值 。 然后， 在 SQL 文本 框 中 的 WHERE 子 句 之 后 添加 一 个 条 件 表达 式 ， 增 加 对 登录 密码 
的 判断 ， 如 图 10.15 所 示 。 
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图 10.15 【数据 集 】 对 话 杠 
(6) 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 当 用 户 输入 登录 名 称 和 登录 密码 并 单 击 


【登录 】 按 钮 时 ， 根 据 数据 集 DataSetl 中 的 记录 是 否 为 空 ， 可 以 判断 用 户 所 输入 的 用 户 名 
及 密码 是 否 正 确 。 

(7) 将 视图 切换 至 【代码 】 视 图 ， 添 加 各 个 按钮 的 单 击 事件 。 

对 于 【和 登录】 按钮 ， 其 所 执行 的 操作 是 首先 根据 数据 集 DataSetl 的 记录 是 否 为 空 判断 
户 所 输入 的 登录 名 称 和 密码 是 否 正确 , 然后 根据 数据 集 DataSetl 中 的 字段 JHTag 的 值 是 
否 为 1 来 判断 用 户 的 账号 是 否 已 被 激活 。 如 果 账 号 已 被 激活 ， 则 表示 用 户 可 正常 登录 ， 此 
时 将 用 户 ID、 用 户 名 称 及 当前 登录 时 间 分 别 赋予 3 个 Cookie 变量 ， 同 时 更 新 用 户 信息 表 
中 的 上 次 登录 时 间 、 本 次 登录 时 间 和 登录 次 数 等 信息 ， 并 将 页 面 跳 转 至 登录 后 的 主页 面 
Main.aspx。 


【登录 】 按 钮 的 事件 代码 如 下 : 
【示例 代码 】 


Sub Login Click(ByVal sender As Object, ByVal E As EventArgs) 
Dim JHStr as String 
Dim StrCnn Rs String 
Dim StrSql As String 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
' 判 断 数 据 集 的 记录 是 否 大 于 0 
If DataSsetl .DefaultView.Table.Rows.Count>0 then 
' 数 据 集 的 记录 大 于 0， 用 户 所 输入 的 名 称 及 密码 正确 
' 获 取 当 前 用 户 账号 的 激活 标志 
JHStr=DataSetl .DefaultView.Table.Rows (0) ("JHTag") 
IE trim(JHStr)="1" Then 
"激活 标志 为 1， 账 号 已 激活 
Response.Cookies ("id") = DataSet1.DefaultView.Table.Rows (0) ("code") 
"将 用 户 编码 赋予 cookies 变量 ID 
Response.Cookies ("name") = 
Dataset1l.DefaultView.Table.Rows (0) ("username") “' 将 用 户 名 称 赋 予 Cookies 变量 
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Name 
"将 当前 登录 时 间 赋 予 cookies 变量 LoginTime 
Response.Cookies ("logintime") = System.-DateTime .Now 
"获取 数据 库 连 接 字 符 串 ， 并 创建 数据 库 连 接 
strcnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING Cnn") 
Cnn = New OleDbConnection(strcnn) 
Cnn.open () 
"更 新 用 户 信息 表 中 的 上 次 登录 时 间 、 本 次 登录 时 间 以 及 登录 次 数 信息 
StrSql = "update usersheet set lastlogin=currlogin,currlogin='" & 
System.DateTime.Now & "',nums=nums+l Where code=" & 
DataSetl1 .DefaultView.Table.Rows (0) ("code") 
Cmd = New OleDbCommand (strsql, Cnn) 
Cmd.ExecuteNonQuery () 
Cnn.Close () “关闭 数据 库 连接 
"将 页 面 跳 转 至 登录 后 的 主页 面 
Response.Redirect ("main.aspx") 
else 
' 账 号 未 激活 ， 提 示 相 关 信息 
LblErr.Text = "此 账户 尚未 激活 ， 无 法 正常 登录 ! " 
end if 
else 
"数据 集 Dataset1 的 记录 为 空 ， 提 示 错 误 信息 
LblErr.Text = "登录 名 称 或 密码 错误 ! " 
end if 
End Sub 


对 于 【立即 注册 】 按 钮 和 【忘记 密码 】 按 钮 ， 所 执行 的 操作 均 是 将 页 面 直接 跳 转 至 相 


应 的 功能 页 面 ， 其 代码 如 下 : 


【示例 代码 】 

'【 忘 记 密 码 】 按 钮 的 单 击 事件 

Sub Pass Click(ByVal sender As Object, ByVal E As EventArgs) 
Response.Redirect ("LoadPass.aspx") 

End Sub 

"【 了 立即 注册 】 按 钮 的 单 击 事件 

Sub Reg_Click(BYVal sender As Object, ByVal E As EventArgs) 
Response.Redirect ("Login.aspx") 

End Sub 


为 了 简化 系统 ， 这 里 的 用 户 注册 功能 和 找 回 密 码 功能 均 沿 用 了 第 8 章 会 员 管理 系统 中 


对 应 功能 的 相关 页 面 Login.aspx 和 LoadPass.aspx。 对 于 这 两 个 页 面 的 功能 实现 ， 这 是 


不 再 


介绍 ， 读 者 可 直接 参考 8.2 节 和 8.4 节 。 


提示 : 本 页 面 需 导入 System .Data 和 System.Data.OleDb 两 个 命名 空间 。 只 要 在 页 面 的 代码 
中 存在 对 数据 库 的 操作 ( 即 不 是 通过 【服务 器 行为 〗】 面 板 来 对 数据 库 进 行 操 作 )， 均 
需 在 页 面 中 导入 以 上 两 个 命名 空间 。 对 于 这 一 点 ， 在 后 面 的 章节 中 将 不 再 提示 。 


至 此 ， 用 户 登录 页 面 设 计 完 成 ， 页 面 预 览 如 图 10.16 所 示 。 
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用 户 登 录 - Mici net Explorer 
ND 出 W 收 富生 ” 工 RD 十 和 
+- | 加 4 闪光 江 件 杞 
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用 户 登 录 
室 寻 吉 称 
是 录 密码 : 
时 | 
mE | Susn | 
习 
周二 三 [[ 醒 有 wow 剧 


10.16 页 面 预览 


10.3 系统 主页 


10.3.1 主页 框架 


通过 在 登录 界面 输入 正确 的 用 户 名 和 密码 后 ， 即 可 进入 同学 录 系 统 的 主页 。 在 系统 主 
页 中 ， 可 分 为 三 大 块 : 个 人 信息 、 我 的 同学 录 和 班级 信息 。 接 下 来 ， 介 绍 框架 的 建立 及 功 
能 区 域 的 划分 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Main.aspx。 选 择 【 修 改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 页 面 模板 】。 单 击 
【确定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 在 可 编辑 区 域 EditRegionl 中 的 表单 Fom 中 ， 插 入 一 个 1 行 2 列 的 表格 Tablel， 
表格 属性 按 如 图 10.17 所 示 进 行 设 置 。 


1 


EE] 表格 天 [i 二 ro Pr ”下 十 大 可 | 天 可 @ 
到 | [5 pe 边框 
EE 
到 到 到 四 路 DD 中 


图 10.17 表格 属性 


(3) 在 第 1 个 单元 格 中 ， 将 显示 个 人 信息 及 我 的 同学 录 ， 其 中 ， 我 的 同学 录 又 包括 我 
的 班级 和 我 的 学 校 两 部 分 ， 而 在 第 2 个 单元 格 中 ， 将 主要 显示 班级 信息 ， 包 括 班级 基本 信 
息 、 最 近 到 访 的 同学 和 班级 最 新 相片 等 。 

页 面 的 功能 区 域 的 划分 如 图 10.18 所 示 。 
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re 和 
个 人 信息 汪汪 和 
=== 班级 功能 操作 按钮 
我 的 同学 录 
我 的 班级 班级 基本 信息 最 近 到 访 的 同学 
我 的 学 校 班级 最 新 相片 


图 10.18 页 面 功能 区 域 
下 面 逐 步 介绍 如 何 实现 各 区 域 所 对 应 的 功能 。 
10.3.2 个 人 信息 
这 里 的 个 人 信息 并 非 指 当前 登录 用 户 的 详细 资料 ， 而 是 指 当 前 用 户 的 登录 信息 ， 如 用 
户 的 上 次 登录 时 间 以 及 登录 次 数 等 。 
(1) 在 表格 tablel 的 第 1 个 单元 格 中 , 插入 一 个 3 行 3 列 的 表格 table2, 其 属性 设置 如 
图 10.19 所 示 。 


图 融 到 FF Role aa RE aoF ”可 @ 
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图 10.19 表格 属性 


(2) 合并 表格 table2 第 1 行 的 3 个 单元 格 ， 并 在 【属性 】 面 板 中 设置 合并 单元 格 的 背 
景 图 片 为 Image/bg_1.gif; 合并 表格 table2 第 3 行 中 的 3 个 单元 格 ， 并 在 【属性 】 面 板 中 设 
置 合并 单元 格 的 背景 图 片 为 image/bg_4.gif。 

接着 ,分 别 设置 第 2 行 的 第 1 个 单元 格 和 第 3 个 单元 格 的 背景 图 片 分 别 为 Image/bg_2.gif 
和 image/bg 3.gif。 

(3) 在 表格 table2 的 第 2 行 的 单元 格 中 插入 一 个 5 行 1 列 的 表格 table3, 其 属性 设置 如 
10.20 所 示 。 

事实 上 ， 表 格 table3 才 是 真正 用 于 控制 显示 个 人 信息 的 表格 ， 表 格 table2 仅 用 来 实现 
边框 效果 。 

(4) 在 表格 table3 的 各 单元 格 中 输入 相应 的 文本 ,并 插入 一 个 LinkButton 控件 ,如 图 10.21 
所 示 。 
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10.20 ”表格 属性 


10.21 设置 表格 


表格 中 所 添加 的 LinkButton 控件 ， 主 要 用 于 实现 安全 退出 的 功能 。 在 其 属性 设置 中 ， 
ID 值 为 LinkButton1， 前 景色 为 白色 ，OnClick 事件 为 Exit_Click， 如 图 10.22 所 示 。 


标签 篇 辑 回 - LinkButton 


LinkButton - OnClick 


xit_Click 


图 10.22 LinkButton 控件 的 单 击 事件 
接 下 来 ， 将 创建 一 个 数据 集 来 绑 定 个 人 信息 中 相关 数据 的 显示 。 


(5) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 轩 按钮 ， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 ， 在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSetl， 
连接 选择 Cnn， 表 格 选择 UserInfo， 设 置 筛选 条 件 为 字段 Code 等 于 Cookie 变量 ID， 如 
图 10.23 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 。 

(6) 在 【应 用 程序 】 面 板 组 中 , 将 选项 切换 至 【 绑 定 】 面 板 , 选择 并 展开 数据 集 DataSet1， 
如 图 10.24 所 示 。 

(7) 选择 并 拖 动 字段 UserName 至 表格 table3 中 的 文本 “， 您 好 ”之 前 ， 选 择 并 拖 动 
字段 LastLogin 至 文本 “上 次 登录 ”之 后 ， 选 择 并 拖 动 字段 Nums 至 文本 “登录 次 数 : ” 
之 后 。 然后 , 选择 文本 “修改 个 人 资料 ”, 并 在 【属性 】 面 板 中 设置 其 链接 为 ModiUser.aspx。 
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图 10.23 ”创建 数据 集 DataSet1 
ES 服务 器 行为 “组件 


日 且 数据 集 Datasetl) 
Code 
Loginane 
VserPass 


Birth 

Email 
PassQuestion 
PassAnswer 


图 10.24 【 绑 定 】 面 板 


切换 至 【代码 】 视 图 ， 添 加 【退出 】 链 接 的 单 击 事件 ， 其 代码 如 下 : 


【示例 代码 】 
'【 退 出 】 的 单 击 事件 
Sub Exit Click(ByVal Sender As Object, ByVal E As EventArgs) 
' 清 空 cookies 变量 
Response.Cookies ("id") .Value = "" 
Response .Cookies ("name") .Value = "" 
Response.Cookies ("logintime") .Value = "" 
"将 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
End Sub 


至 此 ， 个 人 信息 的 显示 设计 完成 ， 此 部 分 的 预览 效果 如 图 10.25 所 示 。 


胡 勇 辉 ， 您 好 ? 欢迎 光 虱 b 

上 次 登录 : 2006-10-27 1:43:22 
登录 次 数 : 45 

修改 个 人 资料 


10.25 “个 人 信息 ”部 分 的 预览 效果 
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此 外 ， 由 于 本 系统 的 用 户 信息 与 会 员 管理 中 的 用 户 信息 采用 了 相似 的 数据 表 结 构 ， 因 
此 这 里 的 “修改 个 人 资料 ”功能 仍 将 沿用 会 员 管 理 系 统 中 的 修改 个 人 信息 页 面 
ModiUseraspx。 但 由 于 会 员 管理 系统 中 对 登录 用 户 的 标识 是 采用 Session 变量 ， 而 本 系统 
中 是 采用 Cookies 变量 ， 因 此 需要 对 原 页 面 稍 做 修改 ， 操 作 如 下 。 

(1) 将 “会 员 管 理 ” 系 统 中 的 ModiUser.aspx 页 面 复制 到 “同学 录 ” 系 统 目 录 下 。 

(2) 打开 该 文件 , 切换 至 【代码 】 视 图 。 在 此 文件 中 , 有 两 处 调用 了 Session 变量 userid 
来 获取 当前 的 登录 用 户 信息 ， 一 处 是 使 用 【更 新 记录 】 命 令 设置 的 参数 定义 ， 另 一 处 是 在 
Page_Load 事件 中 ， 如 图 10.26 所 示 。 


DatabaseType= 
%>” 
CommandText=" <%# “SELECT * FROM UserSheet WHERE Code = ?° %>" 


< Syston. Confieuration. Confieurationsettines. Appsettings (IO COMECTION DATABASETYPE Cn 


Debug="true” 


> 
《Paraneters> 
Paraneter Nane="@Code” Yalue=’ <%# IIf((Not Is Nothing), “") %>, 
Type="Integer” /> 
/Parameters> 
/MM: Dat aSet > 


<M:PageBind runat=" server” PostBackBind="false” /> 
《script runat="serVer > 
Sub Page_Load(ByYal Sender As Object, ByYal 
If (Not Page.IsPostBack) Then 
If IsDBNull (Session("userid”)) Or Trim(Session("userid")) =“”Then 
Response. Redirect ("default. aspx“) 
else 
if DataSet1.DefaultVWiew. Table. Rows (0) ("Sex”)=" 男 ”then 
Sex. Items (0). Selected = True 


蔡 换 成 Request.Cookies ("id"). Yalue 


10.26 修改 代码 


(3) 将 代码 中 的 Session("userid") 全 部 替换 成 Request.Cookies("id").Value， 即 用 
变量 ID 来 蔡 换 Session 变量 userid。 人 然后， 保存 文件 即 可 。 
“修改 个 人 资料 ”页 面 的 预览 效果 如 图 10.27 所 示 。 
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页 面 预览 效果 


功能 的 具体 实现 ， 请 参考 8.5 节 ， 这 里 不 再 著述 。 
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10.3.3 ”我 的 同学 录 

下 面 介绍 系统 主页 中 的 “我 的 同学 录 ” 功 能 块 的 实现 。 在 “我 的 同学 录 ” 功 能 中 ， 主 
要 包括 “我 的 班级 ”和 “我 的 学 校 ” 两 块 。“ 我 的 班级 ”是 指 当前 登录 用 户 所 注册 的 班级 ， 
而 “我 的 学 校 ” 是 指 当前 登录 用 户 所 注册 的 班级 所 属 的 学 校 。 这 里 ， 仅 使 用 一 个 表格 ， 列 
出 用 户 所 注册 的 班级 名 称 和 所 属 的 学 校 名称 ， 并 提供 相应 的 链接 。 

1. 功能 模块 的 界面 设计 

(1) 在 表格 table2 的 下 面 ， 新 插入 一 个 3 行 3 列 的 表格 table4， 其 属性 设置 如 图 10.28 
所 示 。 


国 表格 I4 fp Fo | An FA 可 类 @ | 元 了 ©® 
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10.28 表格 属性 


(2) 合并 表格 table4 第 1 行 的 3 个 单元 格 ， 并 在 【属性 】 面 板 中 设置 合并 单元 格 的 背 
景 图 片 为 iImage/bg_1.gif; 合并 表格 table4 第 3 行 的 3 个 单元 格 ， 并 在 【属性 】 面 板 中 设置 
合并 单元 格 的 背景 图 片 为 image/bg_4.gif。 

(3) 分 别 设置 第 2 行 的 第 1 个 单元 格 和 第 3 个 单元 格 的 背景 图 片 为 image/bg_2.gif 和 
image/bg 3.gif。 

(4) 在 表格 table4 的 第 2 行 的 单元 格 中 插入 一 个 9 行 5 列 的 表格 table5, 其 属性 设置 如 
10.29 所 示 。 
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图 10.29 表格 属性 


(5) 对 于 表格 table5 中 各 单元 格 的 格式 设置 较为 烦琐 , 这 
里 不 再 更 述 ， 请 读者 参考 源 文 件 。 在 表格 table5 中 插入 相应 的 
文本 和 图 片 链接 ， 其 界面 设计 如 图 10.30 所 示 。 

其 中 ， 【搜索 同学 】、【 搜 索 新 的 班级 】、【 搜 索 新 的 学 
校 】 均 为 图 片 链接 ， 其 链接 的 页 面 分 别 为 
Search ClassMate.aspx、Search.aspx 和 Search.aspx。 


2. 创建 数据 集 图 10.30 界面 设计 
接 下 来 ， 创 建 两 个 数据 集 ， 分 别 用 于 获取 “我 的 班级 ”和 
“我 的 学 校 ” 两 模块 所 对 应 的 动态 数据 。 
(1) 打开 【应 用 程序 】 面 板 组， 切换 至 【服务 器 行为 】 面 板 ， 单 击 居 按钮， 从 弹出 的 
菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 单 击 【高 级 】 按 钮 ， 切 换 至 高 
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级 模式 。 
(2) 在 数据 集 的 高 级 视图 中 ， 单 击 【 添 加 参数 】 按 钮 团 ， 在 弹出 的 【添加 参数 】 对 话 
框 中 设置 参数 名 称 为 “@UserId”， 如 图 10.31 所 示 。 


图 10.31 【添加 参数 】 对 话 框 


(3) 单 击 Build 按钮 , 在 弹出 的 【生成 值 ] 对 话 框 中 , 设置 参数 的 值 为 Cookie 变量 ID， 
如 图 10.32 所 示 。 


图 10.32 【生成 值 】 对 话 框 


(4) 单 击 【 确 定 】 按 钮 ， 返 回 【添加 参数 】 对 话 框 ; 再 次 单 击 【 确 定 】 按 钮 ， 返 回 【 数 
据 集 】 对 话 框 。 设 置 数据 集 的 名 称 为 DataSet2， 连 接 选择 Cnn， 并 在 SQL 文本 框 中 输入 以 
下 SQL 语句 : 


select * from classinfo where id in (select classcode from userclass where 
usercode=?) order by createdate 


数据 集 设置 界面 如 图 10.33 所 示 。 


EEEE 


图 10.33 创建 数据 集 DataSet2 
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(5) 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 这 里 所 创建 的 数据 集 DataSet2 用 于 获取 
当前 登录 用 户 所 注册 的 班级 信息 。 

(6) 在 【服务 器 行为 】 面 板 中 选择 数据 集 DataSet2 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 
【拷贝 】 命 令 。 然后 ,在 【服务 器 行为 】 面 板 的 空白 处 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【 粘 
贴 】 命令， 这 样 将 生成 一 个 新 的 数据 集 DataSet3 。 

(7) 双击 数据 集 DataSet3， 在 弹出 的 【数据 集 】 对 话 框 中 修改 SQL 语句 为 : 

SELECT * FROM schoolinfo WHERE id in (select schoolid from classinfo,userclass 


where classcode=classinfo.id and usercode=?) ORDER BY createdate 


设置 界面 如 图 10.34 所 示 。 


Celect schoolid from 
sinfo id snd usercode=?) 


: QUserId 
Bi, 
‘IE (Oot Roquest. CookiesC.. 


10.34 ”编辑 数据 集 DataSet3 


(8) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet3 的 设置 ， 该 数据 集 用 于 获取 当前 登录 用 
户 所 注册 的 班级 所 属 的 学 校 信息 。 


提示 : 由 于 数据 集 DataSet3 与 数据 集 DataSet2 具有 相同 的 参数 ， 因 此 可 通过 数据 集 的 复制 
操作 来 快速 生成 新 的 数据 集 。 


接 下 来 ， 绑 定数 据 。 
(9) 在 文本 “我 的 班级 ”下 的 单元 格 中 ， 插 入 一 个 <div> 标 签 ， 并 设置 其 相关 的 style 
样式 ， 如 图 10.35 所 示 。 


tr> 
《td height="30" align="left” style="padding-left:5px:"> 


Xdiv style="padding-botton: 2px padding-left:2px: > 
/div> 
Wt 
Wtr> 


10.35 插入 <div> 标 签 
(10) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSet2， 


Sl 
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如 图 10.36 所 示 。 

(11) 选择 并 拖 动 字段 ClassName 至 <div> 标 签 中 。 然 后 ， 在 【设计 】 视 图 中 选择 该 动态 
文本 ， 在 【属性 】 面 板 中 设置 其 【链接 】 属 性 为 “mainaspx?classid=<%b# 
DataSet2 .FieldValue("id", Container) %>”，【 目标】 属性 为 Self。 

(12) 选择 整个 <div> 标 签 ， 在 【应 用 程序 】 面 板 组 中 切换 至 【服务 器 行为 】 面 板 ， 单 击 
园 按 钮 ， 从 弹出 的 菜单 中 选择 【重复 区 域 】 命 令 。 在 弹出 的 【重复 区 域 】 对 话 杠 中， 选择 
数据 集 为 DataSet2， 并 设置 显示 所 有 记录 ， 如 图 10.37 所 示 。 单 击 【 确 定 】 按 钮 ， 完 成 重 
复 区 域 的 设置 。 


田 鲜 数据 集 DataSet1) 
日 范 数据 集 Datsset2) 
I 


10.36 【 绑 定 】 面 板 10.37 【重复 区 域 】 对 话 框 


(13) 在 “我 的 学 校 ” 下 的 单元 格 中 ， 插 入 一 个 <div> 标 签 ， 并 设置 其 相关 的 Style 样式 。 
然后 在 [ 绑 定 面板 中 选择 并 展开 数据 集 DataSet3 , 拖 动 字段 SchoolName 至 刚才 创建 的 <div> 
标签 中 。 选择 该 动态 文本 , 在 【属性 面板 中 设置 其 【链接 】 属 性 为 “SchoolInfo.aspx?id=<%# 
DataSet3.FieldValue("id", Container) %>”，【 目 标 】 属 性 为 Blank。 

(14) 选择 整个 <div> 标 签 ， 在 【服务 器 行为 】 面 板 中 单 击 剧 按 钮 ， 在 弹出 的 菜单 中 选择 
【重复 区 域 】 命 令 。 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 选 择 数 据 集 为 DataSet3， 并 设置 显 
示 所 有 记录 ， 如 图 10.38 所 示 。 

(15) 单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 设置 。 

至 此 ，“ 我 的 同学 录 ” 中 的 信息 显示 全 部 完成 ， 其 预览 效果 如 图 10.39 所 示 。 


委 的 同学 录 1 失 索 同学 
午 的 班级 
4 计算 机 应 用 一 班 
浏阳 一 中 
西安 电子 科技 大 学 
语文 化 补习 学 术 理 三 得 
和 搜索 新 的 班级 
2 
和 [eet ee 
ee 四 订 文 化 补习 学 入 
和 搜索 新 的 学 校 


图 10.38 【重复 区 域 】 对 话 框 图 10.39 “我 的 同学 录 ” 模 块 的 预览 效果 


人 
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10.3.4 ”班级 信息 


“班级 信息 ”模块 是 系统 主页 中 的 一 项 主要 功能 模块 , 它 将 显示 指定 班级 的 相关 信息 。 
这 里 的 “指定 ”是 指 通 过 页 面 参数 ClassID 所 指定 的 班级 ， 该 参数 值 对 应 于 班级 信息 表 中 
的 班级 编码 。 从 主页 结构 中 可 以 看 到 ， 班 级 信息 主要 包括 班级 基本 信息 、 最 近 到 访 的 同学 
和 班级 最 新 相片 三 部 分 。 

1. 功能 模块 的 界面 设计 

首先 ， 来 看 功能 模块 的 界面 设计 ， 如 图 10.40 所 示 。 

由 于 班级 信息 的 功能 界面 较为 复杂 ， 这 里 不 再 对 每 个 表格 的 设计 进行 详细 的 介绍 。 图 
中 ， 班 级 留言 、 班 级 相册 、 通 讯 录 和 班级 管理 为 四 个 图 片 链接 ， 其 链接 的 页 面 分 别 为 
Bjly.aspx、Bjxc.aspx、Bjtxl.aspx 和 Bjgl.aspx。 此 外 ,在 图 中 还 添加 了 一 个 LinkButton 控件 ， 
该 控件 的 显示 文本 为 “退出 此 班级 ”， 其 单 击 事件 为 ExitClass_Click。 


图 10.40 界面 设计 
2. 创建 相应 的 数据 集 


接 下 来 创建 相应 的 数据 集 ， 用 于 实现 各 项 班级 信息 的 动态 显示 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 到 按钮， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【 高 级 】 按 钮 ， 切 换 至 
【数据 集 】 对 话 框 的 高 级 模式 。 

(2) 在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 【添加 参数 】 按 钮 辐 ， 在 弹出 的 【添加 
参数 】 对 话 框 中 设置 参数 名 称 为 “@ClassID ”， 如 图 10.41 所 示 。 


10.41 【添加 参数 】 对 话 框 


(3) 单 击 Build 按钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 参 数 的 值 为 URL 参数 
ClassID， 如 图 10.42 所 示 。 


i 
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Se 
E 司 [CE 了 | 取消 
默认 值 帮助 


10.42 【生成 值 】 对 话 框 


(4) 单 击 【 确 定 】 按 钮 ， 返 回 【添加 参数 】 对 话 框 。 再 次 单 击 【确定 】 按 钮 ， 返 回 【 数 
据 集 】 对 话 框 。 设 置 数 据 集 的 名 称 为 DataSet4， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 以 
下 SQL 语句 : 

SELECT 

classinfo.id,classname, grade, classinfo.createdate, schoolname, count (*)as 

thenum FROM classinfo,schoolinfo,userclass WHERE schoolid=schoolinfo. id 


and classcode=classinfo.id and classinfo.id=? GROUP BY 
classinfo.id,classname, grade,classinfo.createdate, schoolname 


此 时 的 【数据 集 】 对 话 框 如 图 10.43 所 示 。 


| 
Datasat4 —w | 
ww | 
[| 
优 单 
于 助 
图 10.43 创建 数据 集 DataSet4 
(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 ， 访 
数据 集 用 于 获取 指定 班级 的 相关 信息 。 EAI 
(9 在 【应 用 程序 】 面 板 组 中 切换 至 【 绑 定 】 面 Pe 
板 ， 选 择 并 展开 数据 集 DataSet4， 如 图 10.44 所 示 。 二 2 


(7) 选择 并 拖 动 字 段 SchoolName 至 文本 “中 国 同 
学 录 >” 之 后 ; 选择 并 拖 动 字段 ClassName 至 文本 “中 
国 同学 录 > >” 之 后 ， 并 在 【属性 】 面 板 中 设置 动态 文 
本 的 字体 颜色 为 红色 。 重 复 以 上 操作 ， 分 别 选择 并 拖 加 
动 字 段 SchoolName、CreateDate、Grade 和 TheNum 至 [ee 9 we 
文本 “所 属 学 校 ”、“ 创 建 时 间 ”、“ 入 学 年 份 ”以 图 10.44 ”展开 数据 集 DataSet4 
及 “班级 成 员 ” 之 后 ， 同 时 分 别 在 【属性 】 面 板 中 设 
置 动态 文本 的 字体 颜色 为 红色 。 
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(8) 选择 “班级 留言 ” 图片， 在 【属性 】 面 板 中 设置 其 链接 为 “bjly.aspx?id=<9%0# 
DataSet4.FieldValue("id", Container) %>”; 选择 “班级 相册 ”图 片 ， 在 【属性 】 面 板 中 设 
置 其 链接 为 “bjxc.aspx?2id=<9%b# DataSet4.FieldValue("id", Container) %>”; 选择 “通讯 录 ” 
图 片 , 设置 其 链接 为 “bjtxl.aspx?id=<%# DataSet4.FieldValue("id", Container) %>”; 选择 “ 班 
级 管理 ”图 片 , 设置 其 链接 为 “bjgl.aspx?id=<%# DataSet4.FieldValue("id", Container) %>”。 


比 时 ， 数 据 集 DataSet4 的 数据 绑 定 已 经 完成 。 
(9) 在 【应 用 程序 】 面 板 组 中 切换 至 【服务 器 行为 】 


j 板 ， 选 择 数据 集 DataSet4 并 右 


击 ， 从 弹出 的 快捷 菜单 中 选择 【拷贝 】 命 令 。 然 后 ， 在 【服务 器 行为 】 面 板 的 空白 处 右 击 ， 
从 弹出 的 快捷 菜单 中 选择 【粘贴 】 命 令 ， 这 样 将 生成 一 个 新 的 数据 集 DataSet5 。 
(10) 双击 数据 集 DataSet5， 在 弹出 的 【数据 集 】 对 话 框 中 修改 SQL 语句 为 : 


SELECT username FROM usersheet,classinfo WHERE shtag='2' and 


adminuser=usersheet .code and classinfo.id=? 


此 时 的 数据 集 对 话 框 如 图 10.45 所 示 。 


Elk 


图 10.45 ”编辑 数据 集 DataSet5 


(11) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet5 
的 设置 , 该 数据 集 用 于 获取 当前 班级 的 管理 员 信息 。 

(12) 在 【应 用 程序 】 面 板 组 中 切换 至 【 绑 定 】 
面板 ， 选 择 并 展开 数据 集 DataSet5， 如 图 10.46 
所 示 。 

(13) 选择 并 拖 动 字段 UserName 至 文本 “管理 
员 ” 之 后 ， 并 在 【属性 】 面 板 中 设置 动态 文本 的 字 
体 颜色 为 红色 。 

(14) 复制 数据 集 DataSet5， 并 粘贴 生成 新 的 数 
据 集 DataSet6。 双击 数据 集 DataSet6, 在 弹出 的 【 数 
据 集 】 对 话 框 中 修改 SQL 语句 为 : 


数据 库 区 二 时务 跟 行为 | 蛆 件 


+| 一 | 文档 关 型 : AsP ET ve © 
三 
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本 钱 数据 集 Dateset2) 
田 围 数据 集 Dataset3) 
本 名 到 据 集 Dataset4) 


10.46 ”展开 数据 集 DataSet5 


select top 10 * from usersheet where code in (select usercode from userclass 
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where classcode=?) order by currlogin desc 


设置 界面 如 图 10.47 所 示 。 


nm (select sxercode 人 om H] 


om usershent where code 1 
where classeode=?) order by currlogin de: 


pe 


图 10.47 编辑 数据 集 DataSet6 
(15) 单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet6 的 设置 ， 该 数据 集 用 于 获取 最 新 到 访 同 
学 的 相关 信息 。 
(16) 对 于 最 新 到 访 同 学 的 信息 列表 ， 不 能 使 用 简单 的 动态 文本 ， 而 需 采用 【数据 列表 】 
对 话 框 来 实现 。 首 先 ， 在 【应 用 程序 】 面 板 组 中 将 选项 切换 至 【 绑 定 】 面 板 ， 选 择 并 展开 
数据 集 DataSet6， 如 图 10.48 所 示 。 


多 
多 
多 
多 
和 
多 
多 
多 
4 
多 
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娜 定 到 插入 
图 10.48 ”展开 数据 集 DataSet6 
(17) 选择 并 拖 动 字段 UserName 至 文本 “最 近 到 访 ” 下 面 的 单元 格 中 ， 并 在 【属性 】 
面板 中 设置 其 字体 颜色 为 红色 ,【 链 接 】 属 性 为 “bjtxl.aspx?id=<%# DataSet4.FieldValue("id", 
Container) %>#<%# DataSet6.FieldValue("code", Container) %>”, 【目标 】 属 性 为 blank。 
然后 ， 在 该 动态 文本 之 后 ， 输 入 文本 “( 次 )”， 并 拖 动 字段 Nums 至 括号 内 。 
(18) 切换 至 【代码 】 视 图 ， 选 择 在 文本 “最 近 到 访 ” 下 面 的 单元 格 中 所 插入 的 所 有 代 
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码 并 前 切 。 在 【应 用 程序 】 面 板 组 中 切换 至 【服务 器 行为 】 面 板 ， 单 击 画 按钮 ， 从 弹出 的 
菜单 中 选择 【数据 列表 】 命 令 。 在 弹出 的 【数据 列表 】 对 话 框 中 ， 设 置 数据 集 为 DataSet6， 
并 设置 显示 所 有 记录 。 在 【模板 】 列 表 框 中 选择 【项 目 】， 并 在 【内 容 】 文 本 框 中 粘贴 刚 
才 所 剪 切 的 代码 ， 如 图 10.49 所 示 。 


图 10.49 创建 数据 列表 DataList1 


(19) 单 击 【和 确定】 按钮 ， 完 成 数据 列表 的 创建 。 同 时 ， 在 【设计 】 视 图 选择 数据 列表 
DataListl 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 。 在 弹出 的 【标签 编辑 器 】 
对 话 框 中 选择 【布局 】 分 类 ， 设 置 其 【宽度 】 选 项 为 95%，【 单 元 格 边 距 】 选 项 为 3， 如 
图 10.50 所 示 。 


图 10.50 【标签 编辑 器 】 对 话 框 
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单 击 【确定 】 按 钮 ， 完 成 数据 列表 的 设置 ， 同 时 也 完成 了 最 近 到 访 同学 信息 的 数据 
绑 定 


(20) 复制 数据 集 DataSet6， 并 粘贴 以 生成 新 的 数据 集 DataSet7。 双 击 数据 集 DataSet7， 
在 弹出 的 【数据 集 】 对 话 框 中 修改 SQL 语句 为 : 


select top 4 *,('~/photo/'+photoaddr) as photo addr from photoinfo where 
classcode =? order by update desc 


设置 界面 如 图 10.51 所 示 。 
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图 10.51 编辑 数据 集 DataSet7 
(21) 单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet7 的 设置 ， 该 数据 集 用 于 获取 最 新 班级 相 


片 的 相关 信息 。 
与 最 近 到 访 同学 的 数据 绑 定 类 似 ， 对 于 最 新 班级 相片 的 数据 绑 定 同样 需要 使 用 【数据 


列表 】 对 话 框 来 实现 。 

3. 创建 单条 数据 的 显示 

(1) 在 文本 “最 新 相片 ”下 的 单元 格 中 插入 一 个 2 行 1 列 的 表格 ， 其 表格 属性 设置 如 
图 10.52 所 示 。 


FF| 表格 天 PP 交 hz [名 末 到 ”填充 o ”对 齐 区 人 避 类 GO 无 -| 回 
El 一 高 ”|[ 末 可 ae ”边框 p 
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10.52 ”表格 属性 


(2) 在 表格 第 1 行 的 单元 格 中 ， 揪 入 一 个 Image 控件 ， 设 置 其 ImageUrl 属性 为 “<%# 
DataSet7.FieldValue ("Photo_Addr", Container) %>”， 其 高 度 为 90 像素 ， 宽 度 为 130 像素 。 
同时 ， 在 【属性 】 面 板 中 设置 其 链接 为 “Viewphoto.aspx?id=<%# DataSet7.FieldValue("id", 


Container) %>”。 
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G) 在 【应 用 程序 】 面 板 组 中 切换 至 【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSet7， 如 
图 10.53 所 示 。 

(4) 选择 并 拖 动 字 段 PhotoName 至 前 面 所 创建 的 表 
格 的 第 2 个 单元 格 中 , 然后 设置 两 个 单元 格 的 水 平 对 齐 广 于 
式 为 【居中 对 齐 】。 此 时 ， 单 条 数据 的 绑 定 完成 。 思量 eet 

(5) 切换 至 【代码 】 视 图 ， 选 择 整个 表格 的 代码 ， 将 
其 前 切 。 然 后 ， 在 【应 用 程序 】 面 板 组 中 切换 至 【服务 器 
行为 】 面板 ， 单 击 国 按 钮 ， 在 弹出 的 菜单 中 选择 【数据 列 
表 】 命 令 。 在 弹出 的 【数据 列表 】 对 话 框 中 ， 设 置 数据 集 
为 DataSet7， 并 设置 显示 所 有 记录 。 在 【模板 】 列 表 框 中 
选择 【项 目 】， 并 在 【内 容 】 文 本 框 中 粘贴 刚才 所 剪 切 的 
代码 ， 如 图 10.54 所 示 。 


De 
数据 集 |nstaset7 了 | 
显示 : 个 四 一 记录 帮助 人 D 

所 有 记录 
模板 : 


图 10.54 创建 数据 列表 DataList2 


(6) 单 击 【 确 定 】 按 钮 ， 完 成 数据 列表 的 创建 。 

至 此 ， 数 据 绑 定 工作 已 经 完成 ， 剩 下 的 是 相关 事件 代码 的 添加 。 

(7) 添加 【退出 此 班级 】 链 接 的 单 击 事件 代码 。 在 退出 班级 的 操作 中 ， 为 了 保证 数据 
的 完整 性 ， 需 要 执行 以 下 4 步 操作 。 

Q@ 删除 当前 用 户 在 所 要 退出 的 班级 中 上 传 的 相片 时 发 表 的 所 有 评论 信息 ; 

@ ”删除 当前 用 户 在 所 要 退出 的 班级 中 上 传 的 相片 信息 ; 

@ ”删除 当前 用 户 与 所 要 退出 的 班级 的 关联 信息 ; 

@ ”如果 当前 用 户 为 所 要 退出 的 班级 的 管理 员 ， 则 还 需 将 该 班级 的 管理 员 信 息 清空 。 

以 下 ， 是 【退出 此 班级 】 链 接 的 单 击 事件 代码 : 

【示例 代码 】 

Sub ExitClass Click(ByVal Sender As Object, ByVal E Rs EventArgs) 

Dim Cnn As OleDbConnection 


Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
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Dim Sql As String 

"获取 所 要 退出 的 班级 编码 

Dim ClassID as String=request.-QueryString("classid") 

"获取 当前 用 户 编码 

Dim UserID as String=Request.Cookies ("id") .Value 

"获取 数据 库 连 接 字 符 串 

Strcnn = System.Configuration.ConfigurationSettings.AppSettings 
("MM CONNECTION STRING Cnn") 

Cnn = New OleDbConnection(strcnn) 

Cnn.Open () “连接 数据 库 

"删除 对 当前 用 户 在 所 要 退出 的 班级 中 上 传 的 相片 时 发 表 的 评论 信息 

Sql = "delete from photo pl where photoid in (select id from photoinfo where 
upuser=" & trim(userid) & " and classcode=" & trim(classid) & ")" 

Cmd = New OleDbCommand (Sql, Cnn) 

Cmd .ExecuteNonquery 

"删除 当前 用 户 在 所 要 退出 的 班级 中 上 传 的 相片 信息 

Sql = "delete from photoinfo where upuser=" & trim(userid) & " and 
classcode=" & trim(classid) 

Cmd = New OleDbCommand(sql, Cnn) 

Cmd .ExecuteNonquery 

"删除 当前 用 户 与 所 要 退出 的 班级 的 关联 

Sql = "delete from userclass where usercode=" & trim(userid) & " and 
classcode=" & trim(classid) 

Cmd = New OleDbCommand (Sql, Cnn) 

Cmd .ExecuteNonquery 

"如 果 当 前 用 户 为 所 要 退出 的 班级 的 管理 员 ， 则 将 该 班级 的 管理 员 信息 清空 

Sql = "update classinfo set shtag='0' where id=" & trim(classid) & " and 
adminuser=" & trim(userid) 

Cmd = New OleDbCommand (Sql, Cnn) 

Cmd .ExecuteNonquery 

cnn.Close() ' 关 闭 数据 库 连 接 

' 将 页 面 跳 转 至 本 页 面 

response.Redirect ("main.aspx") 
End Sub 


(8) 添加 页 面 加 载 时 所 执行 的 Page_Load 事件 代码 。 在 该 事件 中 ， 首 先 需 对 当前 用 户 
的 身份 进行 验证 ， 即 根据 Cookie 变量 ID 的 值 来 确认 用 户 是 否 已 登录 ; 其 次 ， 当 页 面 未 带 
参数 时 ， 需 要 获取 默认 的 一 个 班级 代码 并 将 其 作为 页 面 参数 传递 至 本 页 面 。 

Page_Load 事件 代码 如 下 : 

【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If Not IsPostBack() Then 
"判断 cookie 变量 ID 是 否 存 在 
If IsDBNull (Request.Cookies ("id") .Value) OF 
Trim(Request .Cookies ("id") .Value) = "" Then 
"'Cookie 变量 ID 不 存在 ， 用 户 为 非法 用 户 ， 将 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
Else 
' 判 断 页 面 参数 classID 是 否 存 在 
if Request.Querystring ("ClassID")="" then 
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' 页 面 参 数 classID 为 空 ， 获 取 数 据 集 DataSet2 的 第 一 条 记录 的 字段 ID 的 值 作为 默认 
的 班级 编码 
if DataSet2.DefaultView.Table.Rows .Count>0 Then 
Response.Redirect ("main.aspx?ClassID=" & 
DataSet2.DefaultView.Table.Rows (0) ("ID")) 
End if 
End if 
End If 
End If 
End Sub 


至 此 ， 系 统 主页 中 的 所 有 功能 全 部 完成 ， 页 面 预览 效果 如 图 10.55 所 示 。 
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图 10.55 页 面 预览 效 果 
10.4 班级 留言 


班级 留言 页 面 为 同班 同学 提供 了 一 个 相互 交流 的 场所 ， 它 与 第 7 章 中 的 留言 德 较为 相 
似 。 不 同 的 是 ， 普 通 留 言 簿 是 针对 站 点 或 管理 员 发 表 的 留言 ， 管 理 员 可 以 对 留言 信息 进行 
屏蔽 或 删除 ， 而 班级 留言 簿 是 班级 中 的 所 有 同学 相互 留言 ， 大 家 处 于 一 个 同等 的 地 位 ， 所 
发 表 的 留言 一 般 来 说 也 无 须 进行 管理 (当然 ， 也 可 由 班级 管理 员 进 行 管理 )。 

在 班级 留言 中 ， 主 要 包括 留言 信息 的 浏览 和 发 表 新 留言 两 项 功能 。 


4 


"2 Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


10.4.1 浏览 留言 


(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 bjly.aspx。 选 择 【 修 改 】|【 模 板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】。 单 击 【确定 】 
按钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 在 可 编辑 区 域 EditRegionl 中 的 表单 Form 中 ， 插 入 一 个 1 行 2 列 的 表格 table2， 
表格 属性 的 设置 如 图 10.56 所 示 。 


国 ] .二 3 @ 
这 杠 厅 


一 中 wz a 高 [EE 
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10.56 表格 属性 


(3) 设置 第 2 个 单元 格 的 水 平 对 齐 方式 为 【 右 对 齐 】， 并 在 两 个 单元 格 中 分 别 插入 图 
片 和 文本 ， 如 图 10.57 所 示 。 


|: 我 的 同学 录 》》 : 


图 10.57 插入 的 图 片 和 文本 


(4) 选择 文本 “我 的 同学 录 ”, 在 【属性 】 面 板 中 设置 其 链接 为 Main.aspx, 目标 为 _self; 
选择 图 片 “发 新 留言 ”, 在 【属性 面板 中 设置 其 链接 为 “Bjly_Add.aspx?ClassID=<%=Request. 
QueryString("id")%>”， 目 标 为 _self。 在 文本 “我 的 同学 录 ” 后 面 的 两 个 尖 插 号 之 后 ， 分 别 
绑 定 用 于 显示 当前 班级 的 所 属 学 校 名 称 以 及 班级 名 称 的 字段 。 

(5) 打开 【服务 器 行为 】 面 板 ， 单 击 型 按钮， 在 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 

(6) 在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 【 添 加 参数 】 按 钮 团 ， 在 弹出 的 【添加 
参数 】 对 话 框 中 设置 参数 名 称 为 “@ClassID ”， 如 图 10.58 所 示 。 


赤 加 参数 


SD 
us [sicrnt | 
值 : 


到 | 
Build 


10.58 【添加 参数 】 对 话 框 


(7) 单 击 Build 按钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 参数 的 值 为 URL 参数 ID， 
如 图 10.59 所 示 。 


出! 


* 


10.59 【生成 值 】 对 话 框 


汪汪 


(8) 单 击 【 确 定 】 按 钮 ， 返 回 【添加 参数 】 对 话 框 ; 再 次 单 击 【确定 】 按 钮 ， 返 回 【 数 
据 集 】 对 话 框 。 设 置 数据 集 的 名 称 为 DataSetl ， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 以 


下 SQL 语句 : 


select classinfo.id,classname,schoolname from classinfo,schoolinfo where 


schoolid=schoolinfo.id and classinfo.id=? 


如 图 10.60 所 示 。 
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10.60 创建 数据 集 DataSet1 


(9) 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 ， 该 数据 集 用 
于 获取 当前 的 班级 名 称 以 及 所 属 的 学 校 名 称 。 

(10) 在 【 绑 定 】 面 板 中 选择 并 展开 数据 集 DataSetl ， 如 
图 10.61 所 示 。 

(11) 选择 并 拖 动 字段 SchoolName 至 文本 “我 的 同学 录 >” 
之 后 ， 并 在 【属性 】 面 板 中 设置 其 字体 颜色 为 红色 ; 选择 并 拖 
动 字段 ClassName 至 文本 “我 的 同学 录 >>” 之 后 ， 并 在 【属性 】 
面板 中 设置 其 字体 颜色 为 红色 。 

接 下 来 ， 介 绍 班级 留言 信息 的 浏览 功能 的 实现 ， 这 里 需要 
使 用 【服务 器 行为 】 面 板 中 的 【重复 区 域 】 命 令 。 

(12) 创建 一 个 数据 集 ， 以 便 绑 定 留言 信息 的 数据 显示 。 复 
制 数据 集 DataSetl,， 并 粘贴 生成 新 的 数据 集 DataSet2。 双击 数据 
集 DataSet2， 在 弹出 的 【数据 集 】 对 话 框 中 修改 SQL 语句 为 : 


数据 库 攻 我 服务 器 行为 | 组 件 
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select theno,userid,classid,title, content, ttime,username from 
lyinfo,usersheet where classid=? and userid=usersheet.code order by ttime 
desc 


如 图 10.62 所 示 。 


ee 
Bigiat 
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10.62 ”编辑 数据 集 DataSet2 


单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet2 的 设置 ， 该 数据 集 将 返回 指定 班级 的 所 有 留 
言 信息 。 

(13) 创建 单条 留言 数据 的 显示 。 在 表格 table2 后 ， 插 入 一 个 4 行 4 列 的 表格 ， 其 表格 
属性 设置 如 图 10.63 所 示 。 设置 各 单元 格 的 属性 , 并 添加 相应 文本 , 其 布局 如 图 10.64 所 示 。 
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10.63 ”表格 属性 


图 10.64 ”设计 的 表格 


(14) 在 【 绑 定 】 面 板 中 ， 选 择 并 展开 数据 集 DataSet2， 如 图 10.65 所 示 。 

(15) 选择 并 拖 动 字段 Title 至 文本 “主题 : ”之 后 ， 选 择 并 拖 动 字段 UserName 至 文本 
“留言 人 : ”的 下 面 ， 选 择 并 拖 动 字段 Content 至 中 间 的 单元 格 中 ， 选 择 并 拖 动 字 段 Ttime 
至 文本 “发 表 时 间 : ”之 后 。 然 后 ， 选 择 文本 “查看 联系 方式 ”， 在 【属性 】 面 板 中 设置 
其 链接 为“ bjtxl.aspx?id=<%# DataSet2.FieldValue("classid", Container) %>#<%# 
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DataSet2.FieldValue("userid", Container) %>”， 【目标 】 属 性 为 blank。 接 着 ， 在 【服务 器 
行为 】 面 板 中 选择 并 双击 动态 文本 DataSet2.Content， 在 弹出 的 【动态 文本 】 对 话 框 中 ， 设 
置 其 格式 为 【编码 -HTML 编码 格式 】， 如 图 10.66 所 示 。 


vw 应 用 程序 二 
数据 库 区 和 服务 器 行为 ”组 件 
+ |X: tsr WT YE OC 

WE 


划 和 JR Server HinlEncode Dataset2 


图 10.65 【 绑 定 】 面 板 图 10.66 ”设置 动态 文本 的 格式 
此 时 ， 单 条 留言 数据 的 绑 定 显示 完成 。 
(16) 选择 显示 单条 留言 数据 的 整个 表格 ， 在 【服务 器 行为 】 面 板 中 单 击 到 按钮 ， 从 弹 
出 的 菜单 中 选择 【重复 区 域 】 命 令 。 在 弹出 的 【重复 区 域 】 对 话 框 中 选择 DataSet2 作为 数 
据 集 ， 并 设置 显示 所 有 记录 ， 如 图 10.67 所 示 。 


图 10.67 【重复 区 域 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 添加 。 
(17) 切换 至 【代码 】 视 图 ， 添 加 页 面 的 Page_Load 事件 代码 ， 如 下 : 
【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If Not IsPostBack() Then 
"判断 cookie 变量 ID 是 否 为 空 
If IsDBNull (Request.Cookies ("id") .Value) Or 
Trim (Request .Cookies ("id") .Value) = "" Then 
' 将 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
End If 
End If 
End Sub 


该 事件 主要 用 于 对 当前 用 户 的 身份 进行 验证 ， 判 断 其 是 否 已 进行 登录 。 如 果 用 户 尚 未 
登录 ， 则 将 页 面 跳 转 至 登录 页 面 。 
至 此 ， 浏 览 留言 的 功能 全 部 设计 完成 ， 其 页 面 预览 效果 如 图 10.68 所 示 。 
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二 班级 号 言 
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上 我 的 同学 录 重 庆 大 学 94i 算 机 应 用 一 班 


【发 表 时 间 : 2006-9-16 17:51:30】 


大 家 知道 吗 ， 少 辉 子 已 经 有 Baby 了 * 我 们 大 家 什么 时 候 一 起 到 必 敢 去 束 豆 ， 具 臭 他， 嘎 样 3 


【发 表 时 间 : 2006-7-7 11:51:22】 


BE 
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图 10.68 页面 预览 效果 

10.4.2 ”发 表 留 言 


在 浏览 留言 页 面 中 ， 单 击 【发 新 留言 】 图 片 链接 ， 即 可 进入 发 表 留 言 页 面 。 在 发 表 留 
言 页 面 中 ， 只 需 录 入 留言 主题 和 留言 内 容 即 可 。 对 于 留言 人 ， 可 根据 Cookie 变量 ID 来 获 
取 ; 而 对 于 留言 的 班级 ， 则 可 根据 页 面 变量 ClassID 来 获取 。 


1. 设计 页 面 的 基本 结构 


新 建 一 个 ASPNET VB 动态 页 ， 将 其 命名 为 bjly_add.aspx。 选 择 【 修 改 】| 【模板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 页 面 模板 】。 单 击 【 确 
定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 


在 可 编辑 区 域 EditRegionl 中 的 表单 Form 中 ， 插 入 一 个 3 行 1 列 的 表格 table2， 表 格 
属性 设置 如 图 10.69 所 示 。 


革 表格 I4 行 B 宣 Feo |[ 吕 来” 二 ”于 友 | ENF 可 类 [无 可 @ 
一 Ts aa [sf 可 ”Ep ie 

天 到 则 至 景 坊 色 厂 -| 边框 闫 色 厂 -| 

到 HH 名 BW $B 到 


图 10.69 表格 属性 
其 中 ， 第 1 行 用 于 显示 当前 班级 所 属 的 学 校 名 称 及 班级 名 称 ， 第 2 行 用 于 控制 第 1 行 
与 第 3 行 的 间距 ， 第 3 行 则 用 于 显示 留言 信息 输入 的 表单 。 
这 里 不 再 对 表格 的 设计 过 程 进行 具体 的 介绍 ， 最 终 的 布局 如 图 10.70 所 示 。 
在 图 10.70 所 示 的 布局 中 , 【提交 】 按钮 下 面 的 两 个 文本 为 两 个 RequiredFieldValidator 


验证 控件 ， 分 别 用 于 对 留言 主题 和 留言 内 容 的 输入 进行 验证 ， 要 求 必须 在 两 个 文本 框 中 输 
入 内 容 。 
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| [FS 可 | 


密 阁 内容; 


10.70 页面 设 计 


2. 创建 一 个 数据 集 

首先 需 创建 一 个 数据 集 ， 主 要 用 于 绑 定 学 校 名 称 与 班级 名 称 的 显示 。 该 数据 集 与 浏览 
留言 页 面 中 的 数据 集 DataSetl 非常 相似 ， 仅 参数 的 取 值 不 同 。 可 惜 Dreamweaver 8 不 支持 
跨 页 面 的 数据 集 复制 ， 因 此 还 得 重新 添加 。 

打开 【服务 器 行为 】 面 板 ， 单 击 转 按 钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 在 弹 
出 的 【数据 集 】 对 话 框 中 ， 单 击 【 高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 

在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 国 按钮 ， 添 加 一 个 新 的 参数 ， 其 名 称 设置 为 
“@ClassID”， 参 数值 设置 为 URL 参数 ClassID。 在 【数据 集 】 对 话 框 中 ， 设 置 数据 集 的 
名 称 为 DataSet1， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 SQL 语句 : 


select classinfo.id,classname,schoolname from classinfo,schoolinfo where 
schoolid=schoolinfo.id and classinfo.id=? 


数据 集 设置 界面 如 图 10.71 所 示 。 
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图 10.71 创建 数据 集 DataSet1 


se 
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单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 ， 该 数据 集 将 返回 当前 的 班级 名 称 以 及 班级 所 
属 的 学 校 名 称 。 

在 【 绑 定 】 面 板 展开 数据 集 DataSetl 。 选 择 并 拖 动 字段 SchoolName 至 文本 “我 的 同学 
录 >” 之 后 ,在 【属性 】 面 板 中 设置 其 字体 颜色 为 红色 ; 选择 并 拖 动 字段 ClassName 至 文本 

“我 的 同学 录 >>” 之 后 ， 在 【属性 】 面 板 中 设置 其 字体 颜色 为 红色 。 然 后 ， 设 置 文本 “我 
的 同学 录 ” 链 接 至 Main.aspx 文件 。 

3. 留言 信息 的 提交 功能 

(1) 实现 留言 信息 的 提交 功能 。 打开 【应 用 程序 】| 【服务 器 行为 】 面板 ， 单 击 园 按钮， 
在 弹出 的 菜单 中 选择 【插入 记录 】 命 令 。 在 【插入 记录 】 对 话 框 中 ， 连 接 选 择 Cnn， 所 要 
插入 的 表格 选择 LyInfo ， 提 交 成 功 后 所 转向 的 页 面 设置 为 “ bjly.aspx?id=<%# 
Request.querystring("classid")%>”。 

(2) 设置 各 列 所 对 应 的 获取 值 。 这 里 需要 设置 的 列 包 括 Title、Content、ClassID 和 
UserID。 其 中 ， 列 Title 和 Content 的 获取 值 分 别 设置 为 表单 变量 title 和 content 的 值 。 此 时 
需要 考虑 的 是 ， 如 何 设置 列 ClassID 和 UserID 的 获取 值 ， 因 为 它们 并 不 是 从 表单 变量 中 获 
取 ， 而 是 分 别 获 取 页 面 参数 ClassID 和 Cookie 变量 ID 的 值 。 但 在 【插入 记录 】 对 话 框 中 ， 
只 能 设置 从 表单 变量 中 获取 值 。 那 么 这 个 问题 怎么 解决 呢 ? 一 般 来 说 ， 有 两 种 方法 。 一 种 
是 在 页 面 中 添加 隐藏 域 ， 来 存储 在 插入 记录 中 需要 获取 的 值 ， 另 一 种 方法 是 修改 
Dreamweaver 8 中 【插入 记录 】 对 话 框 对 应 的 代码 。 在 前 面 的 章节 中 ， 采 用 了 第 一 种 方法 。 
这 里 ,将 采用 第 二 种 方法 。 为 了 便于 修改 代码 ， 将 列 ClassID 和 UserID 的 获取 值 均 设置 为 
表单 变量 Tile， 如 图 10.72 所 示 。 


末 ”失败 时 显示 调 坏 信息 


图 10.72 【插入 记录 】 对 话 框 


(3) 单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 的 添加 。 

(4) 切换 至 【代码 】 视 图 ， 找 到 【插入 记录 】 对 话 框 对 应 的 代码 ， 如 图 10.73 所 示 。 

修改 变量 “@ClassID” 的 取 值 ， 将 表达 式 “Request.Form("title")” 蔡 换 成 “Request. 
querystring("Classid")”; 然后 修改 变量 “@UserID ”的 取 值 , 将 表达 式 “Request.Form("title")” 
替换 成 “Request.Cookies("id").value”。 


Rs 
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A Insert 
runat=" server” 

CommandText=" C%# “INSERT INTO LYInfo (ClassID, Content, Title, UserID) YALUES (?, ?, ?, ?)” %>’ 
ConnectionString=" €%# Systen. Configuration. ConfigurationSettings. AppSettings (“IDI_CONNECTION_STRING_Crn’”) 


%>” 1 
Dat abaseType=”《%## System Configuration. ConfigurationSettings. AppSettings (“NOI_CONNECTION_DATABASETYPE_Crm”) 
%>” 


Expressior=" CW# Request. Forn("IOL insert”) = “fornl” %>” 和 
CreateDataSet="false” 替换 为 Request. querystring (“classid”) 


SuccessURL= CW# “bjly. aspx?id=” + Request.querystring (classid") %>” 
Debug="true” 
>Paraneters》 
Paraneter Nane="@ClassID” Value=’ <%# IIf((Request.Forn("title’) <> Nothing), Request.Forn( title"), "") 
md 


%>” Type="Integer 
ontent” Value=’ <%# IIf((Request.Form(“Content”) <> Nothing), Request.Forn(“Content”), 


ane 
%>” Type="WChar” /> 

<Paraneter Name="@UserID” Yalue=" <%# I1f ( (Cequest. Fornt title’) <> Nothing), Gequest. Forn( title"), “") 
%>” Type="Integer” /> 
/Paraneters> 蔡 换 为 Request.Cookies("id").value 
/MM: Insert> 


10.73 【插入 记录 】 对 话 框 对 应 的 代码 
(5) 修改 代码 之 后 的 页 面 可 以 正常 运行 。 但 也 存在 一 个 小 问题 ， 即 当 用 户 在 【服务 器 
行为 】 面 板 中 双击 【插入 记录 】 对 话 框 对 应 的 项 目 以 对 其 进行 修改 时 ， 是 无 法 打开 【插入 
记录 】 对 话 框 的 ， 系 统 将 会 提示 错误 信息 ， 如 图 10.74 所 示 。 


Macromedia Dreamweaver x 
列 'ClassID' 被 映射 到 | 不 存在 的 表单 元 素 。 
请 格 列 映射 到 现 有 的 表单 元 素 
或 者 格 其 值 设置 为 无 。 


图 10.74 ”提示 对 话 框 


这 是 由 于 在 Dreamweaver 8 的 【插入 记录 】 对 话 框 中 ， 其 列 的 获取 值 是 无 法 识别 非 表 
单元 素 变量 的 。 因 此 ， 当 对 【插入 记录 】 对 话 框 添加 代码 无 须 再 次 通过 该 对 话 框 修改 时 ， 
可 采用 修改 代码 的 方法 来 解决 非 表 单 变 量 获取 值 的 问题 ;否则 ， 则 还 需 通过 第 一 种 方法 来 
解决 ， 即 在 页 面 中 添加 隐藏 域 。 这 点 ， 需 要 特别 提示 大 家 注意 。 

此 外 ， 当 提交 留言 信息 时 ， 可 能 会 存在 所 输入 的 中 文 无 法 保存 的 问题 。 此 时 ， 只 需 将 
切换 至 【代码 】 视 图 ， 并 将 页 首 第 一 行 代码 中 的 “ResponseEncoding="gb2312"” 去 掉 即 可 ， 
如 图 10.75 所 示 。 


<W@ Page Larguage= ”VE”ContentType= text/html” (ResponseEncoding=" gb2312 
<W@ Register TagPrefix="]0I[”Namespace="DreamweaverCtr1s”&Assenb17= 删除 
“DreamweaverCtrls, version=1. 0. 0. 0, publicKeyToken=836f606ede05d46a, culture=neutral” %> J 


;> 


10.75 ”修改 代码 


(6) 在 【代码 】 视 图 中 添加 页 面 的 Page_ Load 事件 代码 ， 以 判断 当前 用 户 是 否 为 合法 
户 。 事 件 代码 与 浏览 留言 中 的 Page_ Load 事件 代码 完全 一 致 ， 这 里 不 再 袭 述 。 
至 此 ， 发 表 留 言 的 页 面 功能 全 部 完成 ， 页 面 预览 效果 如 图 10.76 所 示 。 
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图 10.76 页 面 预览 效果 


10.5 班级 相册 


在 班级 相册 中 ， 将 展示 本 班级 同学 上 传 的 相片 信息 ， 其 功能 包括 浏览 相册 、 查 看 相片 
和 上 传 相片 等 。 其 中 ， 在 查看 相片 功能 模块 中 ， 除 放大 查看 指定 的 相片 外 ， 还 可 查看 其 他 
同学 对 此 相片 的 评论 以 及 发 表 自 己 的 评论 。 


10.5.1 浏览 相册 


新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 bjxc.aspx。 选 择 【 修 改 】| 【模板 】I|【 套 
用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 页 面 模板 】。 单 击 【 确 定 】 
按钮 ， 将 模板 应 用 到 本 页 面 。 

在 可 编辑 区 域 EditRegionl 的 表单 Form 中 ， 插 入 一 个 1 行 2 列 的 表格 table2， 表 格 属 
性 设置 如 图 10.77 所 示 。 


FF 本 和 oa an 9 类 加 | 元 ”可 @ 
ES 列 E ”高 厂 ”| 太 末 可 ia 过 Epo | 


到 到 到 We wme | 
到 到 到 REsB 565G5 


10.77 表格 属性 


设置 第 2 个 单元 格 的 水 平 对 齐 方式 为 【 右 对 齐 】， 并 在 两 个 单元 格 中 分 别 插入 图 片 和 
文本 ， 如 图 10.78 所 示 。 
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我 的 同学 录 >>> 班 级 相册 : | 
图 10.78 表格 设置 

图 中 ， 文 本 “我 的 同学 录 ” 的 链接 设置 为 Main.aspx， 目 标 为 self; 文本 “上 传 相片 ” 
的 链接 设置 为 “bjxc_Add.aspx?ClassID=<%=requestQueryString("id")%>”， 目 标 为 self。 
在 文本 “我 的 同学 录 ” 后 面 的 两 个 尖 括 号 之 后 ， 将 分 别 绑 定 用 来 显示 当前 班级 的 所 属 学 校 
名 称 以 及 班级 名 称 的 字段 。 

1. 创建 一 个 数据 集 

(1) 创建 一 个 数据 集 ， 为 动态 显示 学 校 名 称 与 班级 名 称 提供 数据 源 。 该 数据 集 与 浏览 
留言 页 面 中 的 数据 集 DataSetl 完全 一 样 ， 这 里 不 再 介绍 其 创建 过 程 。 

(2) 创建 数据 集 DataSetl 之 后 ， 在 【 绑 定 】 面 板 中 展开 数据 集 DataSetl 。 分 别 选 择 并 
拖 动 字段 SchoolName 和 ClassName 至 文本 “我 的 同学 录 >” 和 文本 “我 的 同学 录 >>” 之后， 
并 分 别 设置 其 字体 颜色 为 红色 。 

(3) 在 表格 table2 下 ， 插 入 一 个 1 行 1 列 的 表格 table3， 其 属性 设置 如 图 10.79 所 示 。 


FF 表格 天 行 [ = wn Ee 填充 0 EE 习 类 名 [ 玩 | ® 
四 able | En 人 过 ”到 ”间距 ”边框 6 | 

EE] Te ME 

到 到 到 WW ee 所 


图 10.79 表格 属性 


该 表格 用 于 为 相册 浏览 区 域 添加 一 个 边框 ， 边 框 颜色 值 为 “#0033FF”。 在 该 表格 内 ， 
仅 有 一 个 单元 格 ， 此 单元 格 便 是 用 于 显示 所 要 浏览 的 班级 相册 信息 ， 该 信息 将 通过 【服务 
器 行为 】 面 板 中 的 【数据 列表 】 命 令 来 绑 定 实现 。 

在 绑 定 数据 显示 之 前 ， 还 需要 创建 一 个 数据 集 。 由 于 所 要 创建 的 数据 集 与 数据 集 
DataSetl 具有 相同 的 参数 ， 因 此 可 通过 复制 数据 集 DataSetl 来 生成 。 

(4) 复制 数据 集 DataSetl ， 并 粘贴 生成 新 的 数据 集 DataSet2。 双 击 数据 集 DataSet2， 
在 弹出 的 【数据 集 】 对 话 框 中 修改 SQL 语句 为 : 

SELECT photoinfo.*, ('~/photo/'+photoaddr) as photo addr,username, (select 


count (*) FROM photo pl WHERE photoid=photoinfo.id) as pl num FROM 
photoinfo, usersheet WHERE upuser=usersheet.code and classcode =? ORDER BY 


update desc 


如 图 10.80 所 示 。 
(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet2 的 设置 ， 该 数据 集 将 返回 指定 班级 的 所 
有 相片 信息 。 其 中 ， 字 段 PL Num 为 相片 的 评论 数 。 


2. 创建 用 于 显示 单条 相片 信息 的 表格 
(1) 在 表格 table3 中 创建 一 个 用 于 显示 单条 相片 信息 的 表格 ,表格 设计 如 图 10.81 所 示 。 
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图 10.80 ”编辑 数据 集 DataSet2 


图 10.81 中 ， 浅 色 字 体 标记 了 各 处 所 需要 绑 定 哪些 动态 数据 。 此 外 ， 在 文本 “点 击 ” 
和 “评论 ”后 将 分 别 绑 定 显示 相片 的 点 击 次 数 和 评论 次 数 。 

(2) 在 【 绑 定 】 面 板 中 展开 数据 集 DataSet2， 此 时 系统 将 会 弹出 错误 提示 对 话 框 ， 如 
10.82 所 示 。 


[显示 上 传人 ] 


IAA 了 化 IAA 


: Es pt 
法 [显示 相片 和 名称】 |: 


图 10.81 表格 设计 图 10.82 ”错误 提示 对 话 框 


这 并 非 是 用 户 所 创建 的 数据 集 有 问题 。 事 实 上 ， 在 数据 集 DataSet2 的 设计 窗口 中 ， 单 
击 【 测 试 】 按钮， 在 弹出 的 【请 提供 一 个 测试 值 】 对 话 框 中 ， 输 入 变量 @ClassID 的 测试 值 
1， 然 后 单 击 【 确 定 】 按 钮 ， 系 统 将 显示 测试 结果 ， 如 图 10.83 所 示 。 

这 说 明 ， 在 数据 集 DataSet2 中 所 定义 的 SQL 语句 没有 问题 。 那 么 ， 在 【 绑 定 】 面 板 中 
所 弹出 的 错误 提示 对 话 框 是 怎么 回 事 呢 ? 这 是 由 于 数据 集 DataSet2 中 所 定义 的 SQL 语句 包 
含 了 Select 子 查询 语句 (该 语句 用 于 返回 相片 的 评论 数 ), 而 在 Dreamweaver 8 中 并 不 支持 对 
包含 Select 子 句 的 SQL 语句 的 可 视 化 绑 定 操作 。 
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10.83 测试 结果 


不 过 ， 经 过 前 面 的 实践 ， 相 信 大 家 对 绑 定 字段 的 代码 已 经 比较 熟悉 。 因 此 ， 这 里 可 以 
切换 至 [Ra] 视图 ， 在 需要 绑 定 字段 的 地 方 直接 输入 相应 的 绑 定 代码 ， 如 图 10.84 所 示 。 


于 Te wi 
tr height=” 20" > 


td align="center”》 相片 上 传人 

div style="line-height:1.2°> 

Cspan class="STYLE2” FI span> Cbr /> 

点 击 Cspan class=” STYLE1” 大 /apan 欣 ， 评论 

《span class=*STYLE1"XC 

</div> 
</tdy 评论 次 数 点 击 次 数 
/tr> 


<tr> 
<td align="center” style="paddine-top:5px;”> 
<table width="150" cellpadding="0" cellspacing="1" border="0" bgcolor="#999999"> 
<tr> 
<td bgcolor="#FFFFFF” align="center” style="padding-top:S5px:padding-bottom:2px."> 


Casp: Inage ID="Inagel” Height=100 InageUrl=C%# DataSet2.FieldYalue( photo addr”, Container) %》runat= 
“server” /><br /》 Wtd> 
/tr> 


/table> 相片 名 称 相片 路 径 
/td> 
/tr> 
/table> 


图 10.84 添加 绑 定 字段 代码 


图 10.84 中 ， 用 文字 标记 显示 了 所 要 添加 绑 定 字段 的 地 方 ， 并 说 明了 各 绑 定 字段 的 含 
义 。 事 实 上 ， 在 Dreamweaver 8 的 可 视 化 操作 中 ， 尚 存在 一 些 不 足 之 处 (特别 是 对 某 些 
ASP.NET 服务 器 控件 和 数据 集 的 处 理 )。 此 时 ， 完 全 可 以 直接 编辑 代码 ， 来 实现 所 需要 的 
功能 。 

(3) 添加 对 上 传人 和 相片 的 超级 链接 。 其 中 ， 上 传人 的 链接 地 址 为 “bjtxl.aspx?id=<96# 
DataSet2.FieldValue("classcode", Container) %>#<%# DataSet2.FieldValue("upuser", 
Container) %>”， 相 片 的 链接 地 址 为 “viewphoto.aspx?id=<%# DataSet2.FieldValue("id", 
Container) %>”。 


(4) 在 完成 绑 定 字段 的 设置 后 ， 在 【代码 】 视 图 中 选择 并 剪 切 整 个 表格 的 定义 代码 。 
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在 【服务 器 行为 】 面 板 中 单 击 加 按钮 ， 从 弹出 的 菜单 中 选择 【数据 列表 】 命 令 。 在 弹出 的 
【数据 列表 】 对 话 框 中 ， 设 置 数 据 集 为 DataSet2， 并 设置 显示 所 有 记录 。 在 【模板 】 列 表 
框 中 选择 【项 目 】， 并 在 【内 容 】 文 本 框 中 粘贴 刚才 所 剪 切 的 代码 。 同 时 ， 设 置 【 组 织 项 】 


【 表 列 】 为 4， 如 图 10.85 所 示 。 


为 【使 用 表 】， 


Fa 
数据 集 : staset2 | | 
旺 示 :个 厅 一 记录 www | 
所 有 记录 
模板 ; 


ight: 1. 2°>. 
‘a href="bjtxl. aspx?id= CW# Data; 
1" CW# DataSet2. met 各 


| 
表格 单元 格 填 充 古 序 : “” 自 上 而 下 执行 。 从 左 到 右 扫 行 


图 10.85 创建 数据 列表 


(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 列表 的 创建 。 
至 此 ， 浏 览 相册 的 功能 全 部 完成 ， 页 面 预览 效果 如 图 10.86 所 示 。 


图 10.86 页面 预览 效果 


10.5.2 ”查看 相片 
在 浏览 相册 时 ， 可 单 击 具体 的 相片 ， 打 开 一 个 新 的 页 面 以 查看 更 大 尺寸 的 相片 ， 该 页 


他 同学 对 该 相片 的 相关 评论 ， 并 且 在 该 页 还 可 发 表 自己 的 评论 。 


还 显示 了 划 
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新 建 一 个 ASP.NET VB 动态 页 ， 将 其 命名 为 ViewPhoto.aspx。 选 择 【 修 改 】| 【模板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】。 单 击 【 确 定 】 
按钮 ， 将 模板 应 用 到 本 页 面 。 

复制 浏览 相册 中 的 表格 table2， 粘 贴 到 可 编辑 区 域 EditRegionl 中 的 表单 Form 中 ， 如 
10.87 所 示 。 


我 的 同学 录 >> 班 级 相册 : pT 
10.87 复制 表格 


在 表格 table2 的 下 面 , 再 插入 一 个 1 行 4 列 的 表格 table3, 其 表格 属性 设置 如 图 10.88 
所 示 。 


EE ee he [wm 可 cp ”对齐 [IK 类 @[ 元 可 ®@® 


hi NR 商 厂 ”| 售 素 ”下 ”间距 代 边框 
EBERT 
到 到 到 WE 9 已 虽 


10.88 表格 属性 


该 表格 用 于 显示 所 查看 相片 的 基本 信息 ， 包 括 相 片 名 称 、 上 传人 、 点 击 次 数 以 及 上 传 
时 间 等 。 在 表格 的 各 单元 格 中 ， 输 入 相应 的 文本 信息 ， 如 图 10.89 所 示 。 


图 10.89 新 插入 的 表格 table3 


设置 单元 格 中 各 字体 的 颜色 为 白色 ， 并 在 表格 table3 下 插入 一 个 Image 控件 ， 设 置 其 
BorderWidth 属性 为 10，BorderColor 属性 为 “#999999”， 暂 不 设置 其 ImageUrl 属性 。 


1. 创建 一 个 数据 集 


下 面 创建 一 个 数据 集 ， 为 动态 显示 相片 信息 提供 数据 源 。 

(1) 打开 【应 用 程序 】 面 板 组， 切换 至 【服务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 从 弹出 的 
菜单 中 选择 【数据 集 】 命 令 。 在 弹出 的 【数据 集 】 对 话 框 中 单 击 【高 级 】 按 钮 ， 切 换 至 【 数 
据 集 】 对 话 框 的 高 级 模式 。 

(2) 在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 【 添 加 参数 】 按 钮 印 ]， 在 弹出 的 【添加 
参数 】 对 话 框 中 设置 参数 名 称 为 “@PhotoID ”， 如 图 10.90 所 示 。 

(3) 单 击 Build 按钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 参数 的 值 为 URL 参数 ID， 
如 图 10.91 所 示 。 

Se 一 表 | 
I 于 二 性 二 
辐 | 


ai 


10.91 【生成 值 】 对 话 框 


SS 
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10.90 【添加 参数 】 对 话 框 
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(4) 单 击 【 确 定 】 按 钮 ， 返 回 【添加 参数 】 对 话 框 ， 再 次 单 击 【确定 】 按 钮 ， 返 回 【 数 
据 集 】 对 话 框 。 设 置 数据 集 的 名 称 为 DataSetl ， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 以 


下 SQL 语句 : 


SELECT photoinfo.id,photoname, ('~/photo/'+photoaddr) as 

photo addr,username, clicknum, update, classcode, classname, schoolname FROM 
photoinfo,usersheet, classinfo, schoolinfo WHERE upuser=usersheet.code and 
classcode=classinfo.id and schoolid=schoolinfo.id and photoinfo.id=? 


如 图 10.92 所 示 。 


人 :四 加 


习 
Pema 
iets ourystringt... 


加 有 类 由 到 


图 10.92 创建 数据 集 DataSet1 
(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 的 创建 ， 该 数据 集 将 


返回 指定 相片 的 相关 信息 。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 
【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSetl (如 图 10.93 所 示 )， 
按照 下 面 的 操作 绑 定数 据 。 

首先 ， 分 别 选择 并 拖 动 字段 SchoolName、ClassName 至 文 
本 “我 的 同学 录 >” 和 “我 的 同学 录 >>” 之 后 ， 并 分 别 设置 其 
字体 颜色 为 红色 ; 然后， 选择 并 拖 动 字段 PhotoName 至 表格 
Table3 的 第 一 个 单元 格 中 ; 最 后 ， 再 分 别 选 择 并 拖 动 字段 
UserName、ClickNum 和 UpDate 至 文本 “上 传人 : ”、“ 点 击 
次 数 ，”、“ 上 传 时 间 : ”之 后 。 分 别 选择 以 上 动态 文本 ， 在 
【 属性】 面板 中 设置 其 为 加 粗 显示 。 同 时 ， 设 置 Image 控件 的 
ImageUrl 属性 为 “ <%# DataSetl.FieldValue("photo_addr". 
Container) %>”。 


此 时 ， 相 片 基本 信息 的 绑 定 工作 已 完成 。 
2. 创建 第 二 个 数据 集 


下 面 再 来 创建 一 个 数据 集 ， 为 动态 显示 相片 评论 提供 数据 源 。 


-3306s 


YE 用 程序 二 
数据 库 区， 二 服务 器 行为 | 组 件 


| 一 | 文档 类 型: ASP ET 如。 C 


日 吨 数据 集 DataSet1) 
m 


D-DD D-DD- 


4 加 
区 友人 可 了 
10.93 【 绑 定 】 面 板 
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(1) 在 【服务 器 行为 】 面 板 中 选择 数据 集 DataSetl， 将 其 复制 并 粘贴 以 生成 新 的 数据 
集 DataSet2。 双 击 数据 集 DataSet2， 在 弹出 的 【数据 集 】 对话 框 中 ,将 SQL 语句 修改 如 下 : 


SELECT photo pl.*,username FROM photo Pl,usersheet WHERE pl user=usersheet. 
code and photoid=? order by pl date desc 


如 图 10.94 所 示 。 


et 
:Bint 
IE (eqeest gaeryStrine( 


图 10.94 ”编辑 数据 集 DataSet2 


单 击 【 确 定 】 按 钮 ， 完 成 对 数据 集 DataSet2 的 设置 ， 该 数据 集 将 返回 指定 相片 的 所 有 
评论 信息 。 

(2) 在 Image 控件 的 下 方 ， 再 插入 一 个 3 行 1 列 的 表格 ， 用 于 显示 单条 评论 信息 。 依 
次 设置 表格 中 3 个 单元 格 的 高 度 为 5、60 和 25， 同 时 设置 第 1 个 单元 格 的 背景 色 值 为 
“#CCCCCC”， 第 3 个 单元 格 的 水 平 对 齐 方式 为 右 对 齐 ; 然后 ,在 第 1 个 和 第 3 个 单元 格 
中 输入 相应 的 文本 ， 如 图 10.95 所 示 。 


评论 人 :， 评论 时 间 : : 


图 10.95 设置 表格 


(3) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSet2， 
如 图 10.96 所 示 。 

(4) 选择 并 拖 动 字段 PL_Content 至 表格 的 第 2 个 单元 格 中 。 然 后 ， 分 别 选择 并 拖 动 字 
段 UserName、Pl Date 至 文本 “评论 人 : ”和 “评论 时 间 : ”之 后 ， 并 设置 两 个 文本 的 字 
体 颜 色 值 为 “#0000FF”。 

(5) 在 【服务 器 行为 】 面 板 中 ， 选 择 并 双击 动态 文本 DataSet2. PL_ Content， 在 弹出 的 
【动态 文本 】 对 话 框 中 ， 设 置 其 格式 为 【编码 -HITML 编码 格式 】， 如 图 10.97 所 示 。 
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3: [Gs Server HinlEncode DataSet2.F: 


10.96 【 绑 定 】 面 板 10.97 设置 动态 文本 格式 


(6) 单 击 【 确 定 】 按 钮 ， 完 成 动态 文本 的 设置 ， 同 时 也 完成 了 对 单条 评论 信息 的 绑 定 。 

(7) 选择 整个 表格 ， 在 【服务 器 行为 】 面 板 中 单 击 国 按 钮 ， 从 弹出 的 菜单 中 选择 【 重 
复 区 域 】 命 令 。 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 选 择 数据 集 DataSet2， 并 设置 显示 所 有 
记录 ， 如 图 10.98 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 设置 。 

此 时 ， 对 相片 评论 信息 的 数据 绑 定 工作 全 部 完成 。 还 需要 添加 对 相片 评论 的 发 表 。 

(8) 在 前 面 所 创建 的 重复 区 域 下 面 插入 一 个 3 行 1 列 的 表格 ， 并 在 第 1 个 单元 格 中 输 
入 文本 “请 发 表 您 对 本 相片 的 评论 ”， 在 第 2 个 单元 格 中 插入 一 个 文本 框 控件 ， 设 置 其 ID 
为 PlInfo， 文 本 模式 为 多 行 ， 行 数 为 6， 列 数 为 60， 如 图 10.99 所 示 。 


asp: 广 本 杠 四 
Fe 有 | 
站 | 
工具 去: | umw | 


10.98 重复 区 域 图 10.99 设置 文本 框 控 件 的 属性 
在 表格 的 第 3 个 单元 格 中 ， 插 入 一 个 提交 按钮 控件 ， 此 时 的 表格 如 图 10.100 所 示 。 


:请 发 表 您 对 本 相片 的 评论 : 


| Sp: TERTEOR] ] 
提交 评论 


10.100 ”表格 设计 
(9) 实现 评论 信息 的 提交 。 在 【服务 器 行为 】 面 板 中 单 击 卉 按钮， 从 弹出 的 菜单 中 选 
择 [ 插 入 记录 命令 .在 [插入 记录 对话 框 中 ,连接 选择 Cnn, 所 要 插入 的 表格 选择 Photo_PL， 
提交 成 功 后 所 转向 的 页 面 设置 为 “viewphoto.aspx?id=<%# Request.querystring("id")%>”。 
(10) 设置 各 列 对 应 的 获取 值 。 这 里 需要 设置 的 列 包 括 PhotoID、Pl Content 和 Pl] User。 
其 中 ，P1_Content 列 的 获取 值 设置 为 表单 变量 plinfo 的 值 。 而 PhotoID 和 Pl User 两 列 需要 
分 别 获 取 页 面 参 数 ID 和 Cookie 变量 ID 的 值 。 这 里 ， 通 过 修改 代码 的 方法 来 实现 。 为 了 便 


“338。 


第 10 章 ， 同学 录 i 


于 修改 代码 , 将 PhotoID 和 Pl User 两 列 的 获取 值 均 设 置 为 表单 变量 plinfo, 如 图 10.101 所 示 。 


<ESBenm 可 | 
一 一 本 六 ET 

A 吕 帮助 中 
列 : 入 有 过 卫 十 - 


Gets Velue ron “linfe as WChar 
设 有 获取 值 


ts Value From “plinfo as ‘Integer’ 


| 
如 果 成 功 ， 刚 转 到 ;riewphoto aspx7i 4 Ge Request querystrine Cid JX》 浏览 
加 果 失 败 , 则 转 到 : 一 
厅 ”失败 时 显示 调研 信息 


10.101 【插入 记录 】 对 话 框 


(11) 单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 代码 的 添加 。 然 后 ， 切 换 至 【代码 】 视 图 ， 找 
到 【插入 记录 】 服 务 器 行为 对 应 的 代码 ， 如 图 10.102 所 示 。 


i Insert 
runat="server” 

ComnandText=" <%# “INSERT INTO Photo_PL (PhotoID, Pl_Content, Pl_User) YALUES (?, ?, ?)” %>" 
CormectionString=" %# System Configuration. ConfigurationSettings. AppSettings (“JOL_CONNECTION_STRING_Crn”) . 
%>” 

DatabaseType=" OX# Systen. Configuration. ConfigurationSettings. AppSettings (“IO_CONNECTION_DATABASETYPE_Crn” 
) %>” 

Expression=" CX# Request,Forn(“JOLinsert") = “foral” %>" 

"false” 

NW "viewphoto. aspx?id=" + Request. querystrine ("id") 名 


警 换 成 Request.Querystring (“id") 


《Parameters》 
Paraneter Nane="@PhotoID" Yalue=" <%# IIf((Request.Forn(’plinfo”) <> Nothing), (Request.Forn("plinfo” 
“") %>’ Type="Integer” /> 
Paraneter Nane="@Pl1_Content” Value=" %# IIf((Request.Forn("plinfo") ¢> Nothing), Request,Forn( 


“plinfo”), "") %>” Type=" Wohar” /> 
<Paraneter Nane="@Pl_User” Value=" <%# IIf ((Request.Forn("plinfo") ¢> Nothing), (Request. Forn( plinfo") 
"") %>” Type="Integer” /> Te 
es 警 换 成 Request. Cookies ("id). Yalue j 


图 10.102 【插入 记录 】 服 务 器 行为 对 应 的 代码 


修改 变量 “@PhotoID” 的 取 值 ， 将 表达 式 “Request.Form("plinfo")” 替 换 成 “Request. 
Querystring("id")”; 然后 修改 变量 “@P1 User” 的 取 值 , 将 表达 式 “Request.Form("plinfo")” 
替换 成 “Request.Cookies("id").Value】, 此 外 , 别 忘 了 将 页 首 第 一 句 话 中 的 “ResponseEncoding 
="gb2312"” 去 掉 。 否 则 ， 中 文 输入 将 不 会 被 认可 。 

(12) 在 【代码 】 视 图 添加 页 面 的 Page Load 事件 。 在 该 事件 中 ， 除 了 需要 对 用 户 的 合 
法 身份 进行 验证 外 ， 还 需 在 数据 库 中 对 指定 相片 的 点 击 次 数 进行 加 1 操作 。 


【示例 代码 】 
Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 

Dim StrCnn Rs String 

Dim Strsql Rs String 

Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

If Not IsPostBack() Then 

If IsDBNull (Request.Cookies ("id") .Value) OF 
Trim(Request .Cookies ("id") .Value) = "" Then 
Response.Redirect ("default .aspx") “' 将 页 面 跳 转 至 登录 页 面 
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else 
if request.QuerySstring ("id")<>"" then 
StrCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING_cnn") “获取 数据 库 连接 字符 串 
Cnn = New OleDbCconnection (StrCnn) 
cnn.open () “打开 数据 库 连 接 
StrSql = "update photoinfo set clicknum=clicknum+l where id=" & 
request.Querystring ("id") “' 对 指定 相片 的 点 击 次 数 执行 加 1 操作 
Cmd = New OleDbCommand (strsql, Cnn) 
Cmd .ExecuteNonQuery () 
cnn.Cclose () ' 关 闭 数据 库 连 接 
end if 
End If 
End If 
End Sub 


至 此 ， 查 看 相片 的 功能 页 面 制 作 完成 ， 页 面 预 览 效果 如 图 10.103 所 示 。 
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加 从 内江 人 下 大 旦 ! 大 家 训 时 单元 回 攻 大 看 到 加 
E23 | se 


图 10.103 页面 预览 效果 
10.5.3 上传 相片 


上 传 相片 功能 具体 是 指 添加 新 的 相片 至 指定 班级 的 班级 相册 中 。 

1. 页 面 基本 结构 的 设计 

新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Bjxc_Add.aspx。 选 择 【 修 改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 页 面 模板 】。 单 击 


【确定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 
上 传 相片 页 面 与 发 表 留 言 页 面 布局 上 较为 相似 ， 因 此 可 直接 复制 发 表 留言 页 面 的 
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HTML 代码 ， 粘 贴 上 传 相 片 页 面 ， 并 在 其 基础 上 进行 修改 。 

打开 发 表 留 言 页 面 (Bjly_Add.aspx)， 将 视图 切换 至 【代码 】 视 图 ， 并 将 表单 Form 之 内 
的 所 有 HTML 代码 (不 含 【 插 入 记录 】 服 务 器 行为 生成 的 隐藏 域 ) 复 制 到 上 传 相片 页 面 
(Bjxc_Add.aspx) 中 的 表单 Form 内 ， 并 在 【设计 】 视 图 中 对 其 进行 调整 ， 调 整 后 的 布局 如 
10.104 所 示 。 


i 
> 我 的 同学 录 >>> 班 级 相册 


图 10.104 ”调整 后 的 布局 


在 文本 “选择 相片 ”后 的 单元 格 中 ， 添 加 了 一 个 FileUpload 控件 ， 该 控件 是 ASP.NET 
2.0 中 新 增 的 控件 ，Dreamweaver 8 尚 不 支持 对 它 的 可 视 化 操作 。 因 此 ， 只 能 在 【代码 】 视 
图 编写 该 控件 的 定义 代码 ， 如 下 : 

<asp:FileUpload ID="FileUploadl" runat="server" ToolTip=" 选 择 相片 " 

Width="420px" EnableTheming="True" /> 

FileUpload 控件 将 在 界面 上 显示 为 一 个 文件 框 控件 和 一 个 【浏览 】 按 钮 控件 ， 主 要 用 
于 实现 文件 的 上 传 。 

在 【提交 】 按 钮 控件 下 方 ， 添 加 了 一 个 Label 控件 和 一 个 Image 控件 。 前 者 用 于 显示 
上 传 文件 时 可 能 出 现 的 错误 信息 ， 而 后 者 则 用 于 当 单 击 【 预 览 】 按 钮 时 ， 显 示 用 户 所 选择 
的 上 传 文件 的 图 像 。 

2. 创建 数据 集 


首先 ， 创 建 一 个 数据 集 ， 用 来 实现 动态 显示 当前 指定 班级 所 属 的 学 校 名 称 以 及 班级 
名 称 。 

(1) 打开 【服务 器 行为 】 面 板 ， 单 击 型 按钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
在 弹出 的 【数据 集 】 对 话 框 中 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 

(2) 在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 单 击 【添加 参数 】 按 钮 团 ， 在 弹出 的 【添加 
参数 】 对 话 框 中 设置 参数 名 称 为 “@ClassID”， 设 置 其 值 为 URL 参数 ClassID。 然 后 ， 在 
SQL 文本 框 中 输入 以 下 SQL 语句 : 


select classinfo.id,classname,schoolname from classinfo,schoolinfo where 
schoolid=schoolinfo.id and classinfo.id=? 


如 图 10.105 所 示 。 
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EE 一 
Ds N 
| 了 
ER 二 
ee 
图 10.105 创建 数据 集 DataSet1 
(3) 单 击 【 确 定 】 按钮， 完成 数据 集 DataSetl 的 
创建 。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 
板 ， 选 择 并 展开 数据 集 DataSetl ， 如 图 10.106 所 示 。 -| yx 和 型 Asp ET vO 
(4) 分 别 选择 并 拖 动 字段 SchoolName 、 3 全 丙 So 
ClassName 至 文本 “我 的 同学 录 >” 和 “我 的 同学 录 >>” | 
之 后 ， 并 设置 其 字体 颜色 为 红色 。 
(5) 在 页 面 上 ， 添 加 了 一 个 【预览 】 按 钮 ， 该 按 
钮 并 非 ASPNET 中 的 Button 服务 器 控件 ,而 是 HTML 
中 的 <Input type="button"> 标 签 。 当 单 击 【预览 】 按 钮 = 划 
时 ， 将 执行 与 其 关联 的 JavaScript 脚本 函数 人 
DispPhoto0， 该 函数 的 定义 如 下 : 图 10.106 创建 数据 集 DataSet1 
【示例 代码 】 
Function dispphoto(){ 
if 


(document .getElementById ("FileUpload1") .value!="") 
{ 
// 设 置 预览 图 像 的 显示 宽度 
document .getElementById("Imagel") .style.width="300px"; 
// 获 取 上 传 文件 输入 框 的 值 ， 并 将 其 赋予 Image 控件 的 scr 属性 
document .getElementById ("Imagel") .src=document .getElementById(" 
FileUploadl") .value; 
} 
} 


(6) 对 于 【提交 】 按 钮 ， 所 执行 的 操作 包括 两 步 : @ 上 传 用 户 指定 的 文件 ，@ 将 上 传 
的 相片 信息 保存 至 数据 库 中 。 
单 击 【 提 交 】 按 钮 ， 所 执行 的 事件 代码 如 下 : 
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【示例 代码 】 
Sub Save Click(ByVal Sender As Object, ByVal E Rs EventArgs) 
Dim Sql As String 
Dim Namestr As String = title.Text “' 获 取 相片 名 称 信息 
Dim Userstr As String=Request.Cookies ("ID") .value “' 获 取 当 前 用 户 ID 
Dim Classstr RS String=Request .Querystring ("classID") ' 获 取 班 级 ID 
Dim Pathstr As String 
Dim Errstr Rs String 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
"调用 FileUpload 控件 的 HasFile 方法 判断 用 户 是 否 选 择 了 相片 文件 
If FileUploadl .HasFile Then 
"用 户 选择 了 文件 ， 开 始 上 传 
Try 
"设置 文件 上 传 的 目标 路 径 
PathStr = Server.MapPath ("data.mdb") 
Pathstr Left (Pathstr, InstrRev (Trim(Pathstr), "\") - 1) 
PathStr = PathStr & "\photo\" & FileUploadl.FileName 
FileUploadl.Saveas (PathStr) ' 执 行 上 传 操作 
Catch ex As Exception 
"上 传 文件 失败 ， 提 示 错 误 信 息 
ErrStr = "相片 上 传 失败 : " & Replace (ex.Message.Tostring, "/", "//") 
Labell.Text = Trim(Errstr) 
Exit Sub ' 退 出 过 程 
End Try 
"获取 数据 库 连 接 字 符 串 
StrCnn = System.Configuration.ConfigurationSettings.AppSettings 
("MM CONNECTION STRING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
cnn.Open () 
"向 数据 表 PhotoInfo 中 插入 所 上 传 的 相片 信息 
Sql = "insert into photoinfo (upuser,classcode,photoaddr,photoname) 
values(" & trim(Userstr) & "," & trim(Classstr) & ",'" & 
Trim(FileUploadl.FileName) & "','" & Trim(NameStr) & "')" 
Cmd = New OleDbCommand (Sql1， Cnn) 
Cmd .ExecuteNonQuery () 
Cnn.Close() 
"数据 保存 后 ， 将 页 面 跳 转 至 班级 相册 页 面 
Response.Redirect ("bjxc.aspx?id=" & request.QOueryString("classid")) 
End If 
End Sub 


至 此 ， 实 现 了 上 传 相片 页 面 的 功能 ， 页 面 预览 效果 如 图 10.107 所 示 。 
选择 要 上 传 的 相片 文件 后 , 单 击 【预览 】 按 钮 ， 可 在 下 方 预览 该 图 片 , 如 图 10.108 所 示 。 
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| 区 到 


10.108 ”相片 预览 
10.6 ”班级 通讯 录 


在 班级 通讯 录 页 面 可 以 查看 指定 班级 中 所 有 同学 的 联系 方式 ， 其 数据 来 源 主要 从 用 户 
的 注册 信息 中 获取 。 

新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 Bjtxl.aspx。 选 择 【 修 改 】| 【模板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】。 单 击 【 确 定 】 


。344。 


第 10 章 同学 录 。345。 


按钮 ， 将 模板 应 用 到 本 页 面 。 
与 前 面 页 面 类 似 ， 首 先 在 表单 Form 中 插入 一 个 1 行 1 列 的 表格 ， 用 于 显示 当前 页 面 
所 在 的 班级 ， 如 图 10.109 所 示 。 


图 10.109 插入 的 表格 


1. 创建 第 一 个 数据 集 


创建 数据 集 DataSetl ， 用 于 实现 动态 显示 当前 班级 所 属 的 学 校 名 称 以 及 班级 名 称 。 该 
数据 集 与 上 传 相片 页 面 中 所 定义 的 数据 集 DataSetl 一 样 ， 仅 参数 的 取 值 不 同 。 前 者 为 URL 
参数 ID， 而 后 者 为 URL 参数 ClassID 。 对 于 数据 集 DataSetl 的 创建 过 程 ， 这 里 不 再 歼 述 。 

在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSet1。 然 后 
分 别 选 择 并 拖 动 字段 SchoolName、ClassName 至 文本 “我 的 同学 录 >” 和 “我 的 同学 录 >>” 
之 后 ， 并 设置 其 字体 颜色 为 红色 。 

接 下 来 ， 在 该 表格 下 插入 一 个 3 行 3 列 的 表格 table3， 其 属性 设置 如 图 10.110 所 示 。 


国 | 表格 I4 行 B ”“” 宽 E57 [9 可 RE 对 庆 [元 可 类 O[ 直 可 @ 


< Js 习 刘 商 |so [全 未 “ 梧 问号 边框 | 
到 到 到 Re we 
到 列 到 并 你 @| - 9 已 


图 10.110 表格 属性 


该 表格 用 于 显示 指定 班级 的 同学 列表 。 分别 合 并 该 表格 第 1 行 和 第 3 行 的 3 个 单元 格 ， 
并 分 别 设置 其 单元 格 的 背景 图 片 为 Image 目录 下 的 txl 1.gif 和 tx] 3.gif。 然后 , 分 别 设置 第 
2 行 的 第 1 个 单元 格 和 第 3 个 单元 格 的 背景 图 片 均 为 Image 目录 下 的 fxl_2.gif。 最 后 ,在 第 
2 行 的 第 2 个 单元 中 输入 文本 “同学 列表 ”， 并 设置 其 字体 颜色 为 红色 。 除 第 2 行 的 第 2 
个 单元 格 用 于 显示 数据 外 ， 其 余 单 元 格 均 用 于 控制 表格 边框 的 显示 。 

2. 创建 第 2 个 数据 集 
再 创建 一 个 新 的 数据 集 ， 用 于 实现 同学 列表 信息 的 动态 显示 。 

(1) 在 【服务 器 行为 】 面 板 中 ， 复 制 数 据 集 DataSetl 并 粘贴 ， 以 生成 新 的 数据 集 
DataSet2。 双 击 数 据 集 DataSet2， 在 弹出 的 【数据 集 】 对 话 框 中 ， 将 SQL 语句 修改 如 下 : 

SELECT usersheet.* FROM usersheet,userclass WHERE usercode=usersheet .code 

and classcode=? ORDER BY Usersheet .code 

如 图 10.111 所 示 。 

单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet2 的 设置 ， 该 数据 集 将 返回 指定 班级 中 的 所 有 
同学 信息 。 

(2) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 定 】 面 板 ， 选 择 并 展开 数据 集 DataSet2， 
如 图 10.112 所 示 。 
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10.111 编辑 数据 集 DataSet2 


选择 并 拖 动 字段 UserName 至 表格 table3 中 的 文本 “同学 
列表 ”的 下 面 ， 并 在 【属性 】 面 板 中 设置 其 链接 为 “#<%# 
DataSet2.FieldValue("Code", Container) %>”， 然 后 在 该 文本 之 
前 插入 一 个 图 片 ， 其 文件 为 Image 目录 下 的 arrow.gif。 

(3) 在 【代码 】 视 图 中 ， 选 择 并 剪 切 以 上 所 插入 的 动态 文 
本 及 图 片 对 应 的 代码 。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 服 
务 器 行为 】 面 板 ， 单 击 到 按钮 ， 在 弹出 的 菜单 中 选择 【数据 列 
表 】 命 令 。 在 弹出 的 【数据 列表 】 对 话 框 中 ， 设 置 数据 集 为 
DataSet2， 并 设置 显示 所 有 记录 。 在 【模板 】 列 表 中 选择 【项 
目 】， 并 在 【内 容 】 文 本 框 中 粘贴 刚才 剪 切 的 代码 ， 设 置 【 组 
织 项 】 为 【使 用 表 】，【 表 列 】 为 5， 如 图 10.113 所 示 。 


图 10.113 【数据 列表 】 对 话 框 
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提示 : 这 里 使 用 了 锚 点 来 创建 同一 个 页 面 内 的 跳 转 链接 ， 锚 点 的 名 称 为 同学 编码 。 


(4) 单 击 【确定 】 按 钮 ， 完 成 数据 列表 的 创建 。 在 【设计 】 视 图 中 选择 该 数据 列表 
右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 ， 
选择 【布局 】 分 类 ， 设 置 其 宽度 为 90%， 单 元 格 边 距 为 3， 如 图 10.114 所 示 。 

(5) 单 击 【确定 】 按 钮 ， 完 成 数据 列表 的 设置 ， 同 时 也 完成 了 同学 列表 的 数据 绑 定 。 


标签 篇 辑 器 - Datalist 


OnTtenDataBound 


lee 边框 古色 厂 ,| 
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10.114 ”设置 数据 列表 的 布局 


接 下 来 ， 将 实现 所 有 同学 的 通讯 录 信 息 的 浏览 。 由 于 数据 集 DataSet2 中 已 经 包含 了 所 
有 同学 的 基本 信息 ， 因 此 这 里 的 数据 绑 定 将 与 同学 列表 一 起 共用 数据 集 DataSet2 。 

3. 动态 数据 的 显示 

接 下 来 ， 实 现 单条 数据 的 显示 。 

(1) 在 【设计 】 视 图 中 ， 将 光标 置 于 表格 Table3 之 后 。 在 【常用 -插入 】 工 具 栏 中 ， 
单 击 【 命 名 锚 记 】 按 钮 曼 ， 此 时 将 弹出 【命名 锚 记 】 对 话 框 ， 如 图 10.115 所 示 。 


10.115 【命名 锚 记 】 对 话 框 


(2) 这 里 暂 不 设置 锚 记 名 称 ， 单 击 【 确 定 】 按 钮 ， 创 建 一 个 新 的 锚 点 。 切 换 至 【代码 】 
视图 ， 找 到 锚 点 的 定义 代码 ， 设 置 其 属性 name 的 值 为 “<%# DataSet2.FieldValue("Code", 
Container) %>”， 如 图 10.116 所 示 。 
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<a name-K%# DataSet2.FieldYalue ("Code”, Container) %}> 


ay 
</form><!— 


Ir 
10.116 ”设置 锚 点 的 name 属性 


提示 : 由 于 锚 点 的 名 称 只 能 包含 字母 和 数字 ， 而 不 能 包含 特殊 符号 。 因 此 ， 在 图 10.115 中 
不 能 直接 输入 以 上 设置 值 ， 而 只 能 在 代码 中 进行 修改 。 


(3) 在 锚 点 的 起 始 标记 与 结束 标记 之 间 ， 插 入 一 个 5 行 4 列 的 表格 ， 表 格 属性 设置 如 
图 10.117 所 示 。 


EE 行 5 宽 Eo0 [及 赤 ”二 ”填充 对 齐 [ 夺 中 可” 类 加 [元 ”可 © 
| | 习 到 高 5 ”| 纹 末 ”到 ” ”间距 I 边框 

器 人 刘 到 背景 颜色 厂 -|EDEDE 边框 颅 色 厂 ,| | 

到 到 到 WE 人 9D 


图 10.117 表格 属性 
(4) 在 表格 中 输入 文本 ， 并 合并 相应 的 单元 格 ， 使 之 如 图 10.118 所 示 。 


图 10.118 表格 设置 


(5) 该 表格 用 于 显示 单个 同学 的 通讯 录 信息 。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【 绑 
定 】 面 板 , 展开 数据 集 DataSet2, 选择 并 拖 动 相应 的 字段 至 表格 中 相应 的 位 置 , 如 图 10.119 
所 示 。 


i 
固定 电话 ， {DataSet2. Tell】 移动 电话 : :DataSet2. Tel2] 

TT : 
， 电子 邮箱 ，IDataset2.Enaill 好 政绩 友 ， {Dataset2. Zipcode] 


: 联系 地 址 ; Dataset2. Address} 


10.119” 绑 定 字段 


其 中 ， 姓 名 所 对 应 的 动态 文本 (DataSet2.UserName) 的 字体 颜色 设置 为 红色 ， 并 加 粗 显 
示 。 在 数据 表 UserSheet 中 ， 字 段 Birth( 出 生日 期 ) 定 义 为 日 期 /时 间 类 型 ， 其 显示 将 包括 年 
月 日 和 时 间 。 但 这 里 ， 只 需要 显示 其 年 月 日 即 可 。 为 此 ， 需 要 设置 该 动态 文本 的 格式 。 

(6) 在 【服务 器 行为 】 面 板 中 ， 双 击 动态 文本 DataSet2.Birth， 在 弹出 的 【动态 文本 】 
对 话 框 中 ， 设 置 其 格式 为 【日 期 /时 间 -2001 年 1 月 17 日 】， 如 图 10.120 所 示 。 

以 上 操作 实现 了 单个 同学 信息 的 显示 ， 下 面 的 操作 将 实现 多 个 同学 信息 的 显示 。 


“348 。 
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(7) 在 【设计 】 视 图 中 ， 单 击 锚 点 标记 者 (此 操作 将 同时 选择 锚 点 标记 内 的 整个 表格 )。 
在 【服务 器 行为 】 面 板 中 ， 单 击 轩 按钮 ， 从 弹出 的 菜单 中 选择 【重复 区 域 】 命 令 。 在 弹出 
的 【重复 区 域 】 对 话 框 中 选择 数据 集 为 DataSet2， 并 设置 显示 所 有 记录 ， 如 图 10.121 所 示 。 


示人。 四 康 -型 -| 
个 所 有 记录 
图 10.120 ”设置 动态 文本 格式 图 10.121 重复 区 域 


(8) 单 击 【 确 定 】 按 钮 ， 完 成 重复 区 域 的 创建 。 
至 此 ， 页 面 功能 全 部 设计 完成 ， 页 面 预 览 效 果 如 图 10.122 所 示 。 


EE 
| REBE “十 -网 加 仿 | 本 km 天 多 次 何 动 
[tke 加 tet: /ocanos /bp asprne=! 


加 邦人 日 了 阳 5 扶 下 坤 日 下 吕 罕 方 汪 

汉中 话 习 册 文 问 
交 名 : 家 宕 生 日 : 1975 年 12 朋 3 日 
加 证 电 活 :5591037 和 4 电话 :130551755 才 


工作 单位 :长 钞 章 果 软件 
电子 邮箱 :lyite@sba rom 地 下 编码 : 410015 
联系 地 址 : “ 注 南 省 长 尝 市 


扑 名 :， 兰 翻 庆 生 日: 1o7s 年 1 有 12 日 
国旗 电话: :664770 和 动 电 话 : 12974987851 

工作 单位 :长 纱 天 地 人 软件 工作 宣 

电子 闻 六 :hwacS3Gyira ron 部 下 编码 :4i0001 可 
[Ea 区 


图 10.122 ”页面 预 览 效 果 
10.7 班级 管理 


10.7.1 班级 管理 


在 同学 录 的 主页 上 ， 单 击 【班级 管理 】 图 片 链接 ， 即 可 进入 当前 班级 的 管理 功能 页 面 。 
在 班级 管理 中 ， 可 分 为 以 下 4 种 情况 。 
.349 。 
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@ ”当前 班级 尚 无 管理 员 ， 此 时 用 户 可 申请 担任 本 班级 的 管理 员 。 


@ 当 目 前 某 位 同学 已 申请 担任 本 班级 的 管理 员 ， 但 尚未 得 到 班级 多 数 同学 的 同意 ， 
此 时 将 显示 相关 信息 ， 并 提示 当前 的 同学 同意 情况 。 


@ 当 目 前 某 位 同学 已 成 功 担任 本 班级 的 管理 员 , 但 非 当 前 用 户 , 此 时 将 显示 相关 信息 。 
@ 当 目 前 某 位 同学 已 成 功 担任 本 班级 的 管理 员 ， 且 管理 员 就 是 当前 用 户 ， 此 时 将 显 


示 同 学 列表 ， 并 人 允许 管理 员 对 指定 同学 执行 踢 出 班级 操作 。 

对 于 以 上 4 种 情况 ， 在 页 面 中 将 通过 4 个 Panel 控件 来 包含 各 自 所 要 显示 的 内 容 ， 并 
通过 代码 来 控制 当前 显示 哪 种 情况 ， 即 显示 哪个 Panel 控件 。 

(1) 新 建 一 个 ASP.NET VB 动态 页 ， 将 其 命名 为 Bjgl.aspx。 选 择 【 修 改 】| 【模板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 页 面 模板 】。 单 击 【 确 
定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 在 表单 Form 中 插入 一 个 1 行 1 列 的 表格 ， 用 于 显示 当前 页 面 所 在 的 班级 ， 如 
图 10.123 所 示 。 


10.123 ”表格 设计 


这 里 需要 创建 一 个 数据 集 DataSetl 来 实现 学 校 名 称 及 班级 名 称 的 动态 显示 。 该 数据 集 
与 班级 通讯 录 页 面 中 所 定义 的 数据 集 DataSetl 完全 一 样 ,因此 对 其 创建 过 程 这 里 不 再 袭 述 。 

(3) 创建 页 面 的 第 一 个 Panel 控件 。 该 控件 用 于 显示 当前 班级 尚 无 管理 员 情况 下 的 相 
关 信 息 。 单 击 【ASPNET- 插 入 】 工 具 栏 中 的 辆 按钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 
选择 【ASPNET 标签 】|【Web 服务 器 】 分 类 ， 并 在 右边 的 列表 框 中 选择 asp:Panel。 单 击 
【插入 】 按 钮 ， 此 时 将 弹出 【标签 编辑 器 】 对 话 框 。 在 【常规 】 选 项 中 ， 设 置 其 ID 属性 为 
Panell ， 如 图 10.124 所 示 。 


常规 


10.124 【标签 编辑 器 】 对 话 框 


» 
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单 击 【确定 】 按 钮 ， 完 成 Panel 控件 的 插入 。 

(4) 在 Panel 控件 Panell 中 , 插入 一 个 3 行 3 列 的 表格 , 其 属性 设置 如 图 10.125 所 示 。 

分 别 合并 表格 第 1 行 和 第 3 行 的 3 个 单元 格 ， 并 分 别 设置 其 背景 图 片 为 Image 目录 下 
的 lybg_ 1.gs 直 和 1lybg 2.gif。 然 后 ， 分 别 设置 表格 第 2 行 的 第 1 个 单元 格 和 第 3 个 单元 格 的 
背景 图 片 为 Inage 目录 下 的 lybg 3.gif 和 1lybg 4.gif。 此 操作 用 于 设置 显示 信息 的 边框 。 


国志 Es 名 
| 习 列 B 高 E50 ”| 全 素 ”到 ” ”间距 边框 站 


到 到 到 WED 边 相 问 色 [| 
到 列 到 再 昌 @@| 8D 


10.125 ”表格 属性 


(5) 在 表格 第 2 行 的 第 2 个 单元 格 中 再 次 插入 一 个 4 行 1 列 的 表格 ， 该 表格 用 于 控制 
相关 信息 的 显示 ， 其 表格 样式 如 图 10.126 所 示 。 


友情 提示 i 
9 
我 要 申请 : 


[ASP:LABEL] 


和 


图 10.126 表格 设计 


(6) 在 表格 所 显示 的 信息 中 ， 插 入 了 一 个 动态 文本 DataSet1.ClassName， 用 于 显示 当 
前 的 班级 名 称 。 此 外 ， 在 表格 中 还 添加 了 一 个 按钮 控件 和 一 个 标签 控件 。 其 中 ， 标 签 控件 
于 显示 当 申 请 操作 成 功 时 的 提示 信息 。 单 击 【 我 要 申请 】 按 钮 ， 可 执行 申请 班级 管理 员 
的 相关 操作 ， 该 按钮 的 ID 设置 为 Sure， 单 击 事件 为 Sure_Click。 

(7) 切换 至 【代码 】 视 图 ， 添 加 【我 要 申请 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 

【示例 代码 】 


Sub Sure Click(ByVal Sender As Object, ByVal E As EventArgs) 

Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim StrCnn Rs String 

Dim Sql As String 

"获取 数据 库 连 接 字 符 串 

StrCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM_CONNECTION_ST 
RING Cnn") 

Cnn = New OleDbConnection (StrCnn) 

cnn.open () ' 创 建 数 据 库 连 接 

"更 新 数据 表 classInfo， 将 申请 标志 shtag 设置 为 1， 同 时 将 申请 管理 员 adminuser 设置 为 
当前 用 户 

Sql="update classinfo set adminuser=" & trim(request.Cookies ("id") .value) 
& ",shtag='1' where id=" & triml(request.Querystring("id")) 

Cmd=New OleDbCommand (sql, Cnn) 

cmd .ExecuteNonquery “执行 更 新 操作 
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Cnn.close() 
' 显 示 申 请 成 功 后 的 提示 信息 
IblInfo .Text=" 您 的 申请 已 经 提交 ， 请 静 候 其 他 同学 的 批复 ! " 
' 将 【我 要 申请 】 按 钮 置 为 不 可 用 状态 ， 以 免 用 户 再 次 单 击 提交 
Sure.Enabled=False 

End sub 


至 此 ，Panel 控件 Panell 的 功能 设计 完成 。 

下 面 ， 添 加 一 个 新 的 Panel 控件 ， 用 于 显示 当 某 位 同学 已 申请 担任 本 班级 的 管理 员 ， 
但 尚未 得 到 班级 多 数 同学 的 同意 批复 情况 下 的 相关 信息 , 即 此 时 班级 管理 员 处 于 待定 状态 。 

(8) 在 【代码 】 视 图 中 ， 选 择 并 复制 整个 Panell 控件 的 代码 ， 然 后 在 其 后 进行 粘贴 。 
切换 至 【设计 】 视 图 ， 对 复制 生成 的 Panel 控件 进行 修改 ， 设 置 其 ID 为 Panel2。 然 后 ， 删 
除 用 于 显示 信息 的 嵌 套 表格 的 第 4 行 ， 并 对 该 表格 的 内 容 进行 调整 ， 调 整 后 的 表格 如 
图 10.127 所 示 。 


友情 提示 
凌 江 让 并]) 忆 弟 请 拍 社 类 班 阅 位 at sset1. classnane} ) 的 斑 红 党 理 员 六 
目前 同学 批复 情况 : 


同 _ 意 [ASP:LABEL] 人 
不 同意 ，[ASP:LABEL] 人 
.未 批 复 :、[ASP:LABEL1、 人、 


图 10.127 表格 设计 

这 里 ， 除 了 对 显示 文本 进行 修改 外 ， 还 添加 了 4 个 标签 控件 和 一 个 【关闭 】 按 钮 控件 。 
标签 控件 分 别 用 于 显示 当前 班级 中 申请 担任 班级 管理 员 的 同学 姓名 ， 以 及 在 同学 批复 情况 
中 已 经 同意 、 未 同意 和 尚未 批复 的 同学 人 数 ， 标 签 控 件 的 值 将 在 页 面 的 Page_ Load 事件 中 
进行 设置 。 

(9) 单 击 【 关 闭 】 按 钮 ， 可 关闭 当前 页 面 ， 该 按钮 的 ID 设置 为 Close， 单 击 事件 为 
Close_Click。 切 换 至 【代码 】 视 图 ， 添 加 【关闭 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 

【示例 代码 】 

Sub Close Click(ByVal Sender As Object, ByVal E As EventArgs) 

Clientscript.Registerstartupscript (Me.GetType(), "",CloseWindow()) 

End Sub 

在 该 事件 中 , 仅 包含 一 个 语句 , 即 调用 ClientScriptRegisterStartupScript() 方 法 来 调用 自 
定义 函数 CloseWindow(O 所 返回 的 Script 脚本 ， 该 脚本 的 功能 是 关闭 当前 页 面 。 

CloseWindow() 函 数 的 定义 如 下 : 

【示例 代码 】 


Function CloseWindow() as String 


dim Str2 as String 
str2="<script language='javascript'>window.close();<" 
str2+="/" 
str2+="script>" 
return trim(str2) 
End Function 


:2 


第 10 章 ， 同学 录 3 


至 此 ，Panel 控件 Panel2 的 功能 设计 完成 。 

接 下 来 ， 再 通过 复制 Panel2 控件 来 生成 一 个 新 的 Panel 控件 ， 并 修改 其 ID 为 Panel3。 
该 控件 将 对 应 于 第 3 种 情况 ， 即 当 目 前 某 位 同学 已 成 功 担任 本 班级 的 管理 员 ， 但 非 当前 
户 


(10) 在 Panel3 控件 中 ， 修 改 所 显示 的 文本 信息 ， 并 将 【关闭 】 按 钮 控件 的 ID 设置 为 
Closel， 其 事件 名 不 变 。 


提示 : 在 同一 页 面 中 ， 不 能 存在 两 个 ID 名 相同 的 ASP.NET 控件 。 但 不 同 的 控件 ， 可 调用 
同一 事件 。 


其 闭 | 
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在 此 表格 中 ，【 关 闭 】 按 钮 将 执行 Panel2 控件 中 的 【关闭 】 按 钮 所 执行 的 事件 ， 即 
Close_Click 事件 。 

对 于 第 4 个 Panel 控件 ， 由 于 其 界面 显示 与 其 他 Panel 控件 不 同 ,因此 不 能 通过 复制 来 
快速 生成 。 在 第 4 种 情况 下 ， 即 当前 用 户 就 是 本 班级 的 管理 员 ， 此 时 应 提供 对 当前 班级 所 
有 同学 的 管理 。 管 理 同学 的 主要 操作 为 踢 出 班级 操作 ， 该 操作 与 主页 面 中 的 “退出 此 班级 ” 
操作 类 似 ， 惟 一 的 区 别 是 后 者 是 用 户主 动 退出 班级 ， 而 前 者 是 管理 员 强 制 其 退出 。 

(11) 单 击 【ASP.NET- 插 入 】 工 具 栏 中 的 髓 按钮 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 
选择 【ASP.NET 标签 】|【Web 服务 器 】 分 类 ， 并 在 右边 的 列表 框 中 选择 asp:Panel。 单 击 
【插入 】 按 钮 ， 添 加 一 个 新 的 Panel 控件 ， 并 设置 其 ID 为 Panel4。 

为 了 绑 定 同学 列表 的 显示 ， 这 里 需要 创建 一 个 新 的 数据 集 。 

(12) 打开 【服务 器 行为 】 面 板 ， 选 择 数据 集 DataSet1， 将 其 复制 并 以 粘贴 生成 新 的 数 
据 集 DataSet2。 双 击 数据 集 DataSet2, 在 弹出 的 【数据 集 】 对 话 框 中 , 将 SQL 语句 修改 如 下 : 

SELECT code,username, sex, tell,address, nums, currlogin FROM usersheet WHERE 

code in (select usercode from userclass where classcode=?) ORDER BY code 

如 图 10.129 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet2 的 设置 。 

(13) 将 光标 置 于 控件 Panel4 中 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 田 按钮 ， 在 弹出 的 菜 
单 中 选择 【数据 网 格 】 命 令 ， 在 弹出 的 【数据 网 格 】 对 话 框 中 ， 设 置 ID 为 DataGrid1， 数 
据 集 选择 DataSet2， 并 设置 为 一 次 显示 10 条 记录 ，【 导 航 】 选 项 设置 为 【编号 链接 到 每 一 
页 】， 如 图 10.130 所 示 。 
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图 10.130 【数据 网 格 】 对 话 框 
(14) 单 击 【 添 加 列 】 按 钮 殴 ， 从 弹出 的 菜单 中 选择 【' 删 除 ' 按 钮 】 命 令 ， 在 弹出 的 【 删 


除 按钮 列 】 对 话 框 中 ， 设 置 显示 标题 为 【 踢 出 班级 】，【 按 钮 类 型 】 选 择 【 链 接 按钮 】， 
【删除 自 】 选 择 UserSheet, 【主键 】 选 择 Code, 【提交 为 】 选择 Integer， 如 图 10.131 所 示 。 


图 10.131 【删除 按钮 列 】 对 话 框 


单 击 【确定 】 按 钮 ， 完 成 删除 列 的 添加 。 注 意 ， 这 里 所 添加 的 删除 列 并 非 真 正 删除 用 
户 的 信息 ， 而 是 删除 用 户 与 班级 的 关联 。 为 此 ， 后 面 将 会 对 删除 列 的 默认 事件 进行 修改 。 

(15) 在 【数据 网 格 】 对 话 框 的 【 列 】 列 表 框 中 ， 选 择 ID 列 ， 单 击 【 编 辑 】 按 钮 ， 在 弹 
出 的 【简单 数据 字段 列 】 对 话 框 中 设置 该 列 的 显示 标题 为 “编码 ”， 如 图 10.132 所 示 。 


“354。 
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图 10.132 设置 ID 列 的 属性 


(16) 重复 以 上 操作 , 依次 设置 其 余 各 列 的 标题 .设置 后 的 数据 网 格 ] 对 话 框 如 图 10.133 
所 示 。 


图 10.133 ”数据 网 格 中 列 的 设置 


单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 的 初步 创建 。 
(17) 此 时 ， 还 需要 对 数据 网 格 的 显示 作 进一步 调整 。 在 【设计 】 视 图 中 ， 选 择 所 创建 
的 数据 网 格 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命令， 在 弹出 的 【标签 编辑 器 】 
对 话 框 中 ， 选 择 【 布 局 】 分 类 ， 设 置 其 宽度 为 900%， 单 元 格 边 距 为 3， 单 元 格 间距 为 0， 边 
框 宽度 为 1。 然 后 ， 选 择 【 事 件 】 分 类 中 的 OnItemCommand， 将 其 默认 的 事件 
DataSetl.OnDataGridDelete 改 为 自 定义 的 事件 DataGridl Mod， 如 图 10.134 所 示 。 
We | 


到 


图 10.134 设置 OnltemCommand 事件 
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该 


单 击 【确定 】 按 钮 ， 完 成 数据 网 格 的 事件 设置 。 
(18) 切换 至 【代码 】 视 图 ， 添 加 DataGridl Mod 事件 代码 ， 如 下 : 


【示例 代码 】 
Sub DataGridl Mod (ByVal Sender As Object, ByVal E Rs 
DataGridCommandEventArgs) 
Dim codestr As String = E.Item.Cells (0) .Text “' 获 取 所 要 踢 出 班级 的 同学 ID 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim Sql As String 
If CType (e.CommandSource，LinkButton) .CommandName = "Delete" Then 
"获取 数据 库 连接 字符 串 
StrCnn = 
System.Configuration.ConfigurationSettings.ApPPSettings ("MM CONNECTION ST 
RING Cnn") 
' 创 建 数 据 库 连 接 
Cnn = New OleDbConnection(strcnn) 
cnn.Open () 
' 删 除 对 指定 用 户 在 本 班级 中 上 传 的 相片 所 发 表 的 评论 信息 
Sql = "delete from photo pl where photoid in (select id from photoinfo 
where upuser=" & trim(codestr) & " and classcode=" & 
trim(request.Querystring ("id")) & ")" 
Cmd = New OleDbCommand (Sql, Cnn) 
Cmd.ExecuteNonquery 
' 删 除 指定 用 户 在 本 班级 中 所 上 传 的 相片 信息 
Sql = "delete from photoinfo where upuser=" & trim(codestr) & " and 
classcode=" & trim(request.QueryString("id") ) 
Cmd = New OleDbCommand (sql, Cnn) 
Cmd.ExecuteNonquery 
' 删 除 指定 用 户 与 本 班级 的 关联 
Sql = "delete from userclass where usercode=" & trim(codestr) & " and 
classcode=" & trim(request.Querystring("id")) 
Cmd = New OleDbCommand (Sql, Cnn) 
Cmd.ExecuteNonquery 
' 如 果 指 定 用 户 为 本 班级 的 管理 员 ， 则 将 班级 的 管理 员 信 息 清空 
Sql = "update classinfo set shtag="'0' where id=" & 
trim(request.Querystring("id")) & " and adminuser=" & trim(codestr) 
Cmd = New OleDbCommand (sql, Cnn) 
Cmd .ExecuteNonquery 
cnn.Close() “关闭 数据 库 连 接 
"将 页 面 跳 转 至 本 页 面 ， 刷 新 数据 的 显示 
response.Redirect ("Bjgl.aspx?id="” & request.Querystring("id")) 
End If 
End Sub 


在 DataGridl Mod 事件 中 ， 除 了 需要 删除 指定 用 户 与 当前 班级 的 关联 外 ， 还 需要 删除 


户 在 当前 班级 的 其 他 信息 ， 包 括 所 上 传 的 相片 以 及 针对 相片 的 相关 评论 。 
最 后 ， 来 看 页 面 加载 时 所 执行 的 Page_Load 事件 。 该 事件 在 本 页 面 中 至 关 重 要 ， 它 控 


制 了 页 面 的 不 同 显示 。 在 Page Load 事件 中 ， 首 先 需要 判断 当前 班级 的 管理 员 情况 。 如 果 


es 
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班级 已 经 存在 管理 员 ， 则 还 需 判断 当前 用 户 是 否 就 是 班级 的 管理 员 ， 并 针对 不 同 的 情况 ， 
来 显示 不 同 的 界面 。 

以 下 ， 是 Page Load 事件 的 相关 代码 : 

【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim DataR AS OleDbDataReader 
Dim Sql As String 
"定义 变量 Num_Agree， 用 于 记录 同学 批复 中 的 同意 人 数 
Dim Num Agree as integer 
"定义 变量 Num_NotAgree， 用 于 记录 同学 批复 中 的 未 同意 人 数 
Dim Num NotAgree Rs integer 
"定义 变量 Num_other， 用 于 记录 同学 批复 中 的 尚未 批复 人 数 
Dim Num Other As Integer 
Dim SQUser As String 
Dim i As Integer 
If Not IsPostBack() Then 
"判断 cookie 变量 ID 及 页 面 变量 ID 是 否 为 空 ， 前 者 表示 当前 用 户 ， 后 者 表示 当前 班级 
IE IsDBNull (Request.Cookies ("id") .Value) Or 
Trim (Request .Cookies ("id") .Value) = "" Or Request .Querystring ("id")="" Then 
'Cookie 变量 ID 或 页 面 变量 ID 为 空 ， 将 页 面 跳 转 至 登录 页 面 
Response.Redirect ("default .aspx") 
Else 
' 获 取 数 据 库 连接 字符 串 
StrCnn = 
System.Configuration.ConfigurationSettings.APPSettings ("MM CONNECTION SsT 
RING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
Cnn.open () 
' 查 询 当 前 班级 是 否 存 在 管理 员 信息 ， 包 括 待 批 复 的 和 已 经 成 功 担任 的 
Sql="SELECT code,username, shtag FROM usersheet,classinfo WHERE 
adminuser=usersheet .code and shtag<>'0' and classinfo.id=" & 
trim(request .Querystring ("id")) 
Cmd=New OleDbCommand (sql,cnn) 
DataR=Cmd .ExecuteReader 
If DataR.Read() Then 
' 存 在 班级 管理 员 信息 ， 判 断 其 状态 是 待 批复 还 是 成 功 担任 
If DataR ("ShTag" "1" Then 
"班级 管理 员 的 状态 为 待 批 复 ， 仅 显示 Pane12 控件 
Panel1.Visible=False 
Panel2.Visible=True 
Panel3.Visible=False 
Panel4.Visible=False 
LblTx.Text=DataR ("username") “' 获 取 并 显示 申请 班级 管理 员 的 同学 姓名 
SQUser=DataR ("code") “获取 申请 班级 管理 员 的 同学 ID 
DataR.Close() 


"查询 其 他 同学 的 批复 情况 
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Sql="select hf admin,count (*) as nums from userclass where 
usercode<>" & trim(SQOUser) & " and classcode=" & 
trim(request .Querystring("id")) & " group by hf admin " 

Cmd=New OleDbCommand (Sql, Cnn) 

DataR=Cmd .ExecuteReader 

While DataR.Read() 

If DataR("hf admin")="]1" Then 
' 获 取 不 同意 的 同学 人 数 
Num NotAgree=DataR ("Nums") 
ElselIf DataR ("hf admin") 2" Then 
"获取 同意 的 同学 人 数 
Num Agree=DataR ("Nums") 
Else 
"获取 尚未 批复 的 同学 人 数 
Num_Other=DataR("Nums") 
End If 

End While 

LblAgree.Text=Num _RAgree.ToString () 

LblNotAgree.Text=Num NotRAgree.ToString() 

Lblother.Text=Num Other.ToString () 

El1seIF DataR("code")<>request.Cookies ("id") .value then 

"班级 管理 员 的 状态 为 成 功 担任 ， 且 管理 员 非 当前 用 户 

' 仅 显示 Pane13 控件 

Panell .Visible=False 

Panel2.Visible=False 

Panel3.Visible=True 

Panel4.Visible=False 

LblTxl1 .Text=DataR ("username") 

Else 

' 班 级 管理 员 的 状态 为 成 功 担任 ， 且 当前 用 户 就 是 班级 管理 员 

' 仅 显示 Pane14 控件 

Panell .Visible=False 

Panel2.Visible=False 

Panel3.Visible=False 

Panel4.Visible=True 

End If 
Else 
' 尚 无 班级 管理 员 信息 ， 显 示 Panel1 控件 
Panell .Visible=True 
Panel2 .Visible=False 
Panel3.Visible=False 
Panel4 .Visible=False 
End If 
Cnn.close () “关闭 数据 库 连 接 
End If 
End If 
End sub 


至 此 ， 班 级 管理 页 面 的 功能 设计 全 部 完成 。 根 据 不 同 的 情况 给 出 不 同 的 显示 。 在 当前 
班级 尚 无 管理 员 时 ， 页 面 预览 效果 如 图 10.135 所 示 。 
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P 我 的 同学 好 ?重庆 大 学 4 计算 机 应 月 一 碍 XiE 和 理 


友情 提示 


贵 碍 《54 计 算 横 应用 一 班 ) 生前 尚 无 王 溉 管理 员 ! 如 果 加 愿意 ， 候 可 申请 担任 
本 斑 的 管理 员 ! 


过 要 中 请 


10.135 页面 预览 效果 


此 时 ， 单 击 【 我 要 申请 】 按 钮 ， 可 申请 担任 当前 班级 的 班级 管理 员 。 在 当前 班级 已 有 
管理 员 但 尚 处 于 待定 状态 时 ， 页 面 预览 效果 如 图 10.136 所 示 。 


可 页 钰 管理 - Microyoft Internet Explorer 
ET 
jr -加 四 对 | WR 天 如 亲本 
[Mik [repocaro odo sme 


有 ee、 .中 国 同 3 


DD 续 的 同学 录 》 重 扩大 学 ;94 计 算术 应 用 一 环 靖 邮 营 理 


友情 提示 


贵 班 同学 ( 骨 旨 风 ) 已 中 请 担 主 贵 班 《sd4 计 蓝 机 应 用 一 班 》 的 班级 管理 吧 ! 
目前 同学 批复 情况 


同意 2 人 


不 同意 ，2 人 
未 批复 3 人 


ET 


图 10.136 页面 预览 效果 
单 击 【 关 闭 】 按 钮 ， 可 关闭 当前 页 面 。 当 当前 班级 已 存在 管理 员 信 息 且 已 成 功 担任 时 ， 


如 果 当 前 用 户 非 班级 管理 员 ， 则 页 面 预览 效果 如 图 10.137 所 示 。 
如 果 当 前 用 户 为 当前 班级 的 班级 管理 员 ， 则 页 面 预览 效果 如 图 10.138 所 示 。 
此 时 ， 可 对 指定 的 同学 执行 中 出 班级 操作 ， 即 将 该 用 户 从 本 班级 中 删除 。 
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ET EE 证 瑟 
时 四 |) nspjlochortoqed aaprad-: 可 到 | 村 


x 中国 同 0 


我 的 同 对 ;直下 地 94i| 复 名 应 周一 这 ;站 如 管理 


友情 提示 


中 本 同学 (证 甘 ) 为 现 计算 机 应 用 一 贞 ) 的 玉 委 和 再 员 ! 您 如 困 有 什么 站 
题 ， 请 与 联系 


EJ 


习 
河 [[[ 原 ass 


10.137 页面 预览 效果 


篇 码 。 效 各 性别。 联系 电话 联系 雹 直 到 录 交 数 是 后 登录 时 则 晶 出 下 级 
1 训 辉 。 胃 sso1077 长 市 加 2006-H-t 17:15:06 抽出 班 
4 2 海 去 Sama 长 钞 下 006-5- 芭 900 四。 碌 出 EI 
7 向 肯 四 虱 醒 F 市 起 2003-4-8 0:00:00 。。 妇 出 得 纪 
5 计时 胃 1 发 钞 市 u ‘2900-6-20 0:00 C0。 银 H 
日 扶 E 塌 男 ons9ono 省 村 州 市 了 Do6-6-15 0:00 0 中 出 了 
10 WY 。 男 厂 可 省 广州 市 天 HZ 2 DEL 0-00-00 。。。 钢 岂 由 
二。 庚 去。 or 省 村 放 市 a 2006-9-24 0:00 .C0 痕 出 焉 外 
12 有福 雪 三 本 有 厂 市 天 现 双 5 2003-7-4 00000 。。。 课 HHHET 
1 
天 
[SE 厂矿 三 革 和 mae 4 


图 10.138 页 面 预览 效果 
10.7.2 ”批复 申请 


当 某 个 同学 申请 担任 指定 班级 的 管理 员 时 ， 只 有 经 过 该 班 大 多 数 同学 的 同意 之 后 ， 才 
可 正式 成 为 该 班 的 班级 管理 员 ， 而 如 果 多 数 同学 批复 不 同意 ， 则 该 用 户 的 申请 将 被 取消 。 

对 于 管理 员 申 请 的 批复 操作 是 在 一 个 弹出 页 面 中 执行 的 , 页 面 文件 名 为 Pop_Info.aspx。 
当 用 户 进 入 同学 录 的 主页 (此 时 ， 将 加 载 显示 其 最 先 加 入 的 班级 信息 ) 或 选择 进入 指定 的 班 
级 时 ， 在 页 面 的 Page Load 事件 中 将 会 判断 该 班级 是 否 存在 待 批复 的 管理 员 信息 ;如果 存 
在 ， 则 弹出 批复 申请 页 面 。 为 此 ， 需 要 修改 系统 主页 (Main.aspx) 中 的 Page_Load 事件 。 修 
改 后 的 事件 代码 如 下 : 

【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
Dim Cnn As OleDbConnection 
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Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim DataR AS OleDbDataReader 
Dim Sql As String 
Dim Pop_Str Rs String “定义 变量 Pop Str， 用 于 存储 弹出 页 面 的 Script 脚本 
If Not IsPostBack() Then 
If IsDBNull (Request.Cookies ("id") .Value) OF 
Trim(Request .Cookies ("id") .Value) = "" Then 
"Cookie 变量 ID 为 空 ， 将 页 跳 转 至 登录 页 面 
Response. Redirect ("default .aspx") 
Else 
if Request .QueryString ("ClassID")="" then 
' 页 面 参数 classID 为 空 ， 获 取 数 据 集 DataSet2 的 第 一 条 记录 的 字段 ID 的 值 作为 默认 
的 班级 编码 
If DataSet2.DefaultView.Table.Rows.Count>0 Then 
Response.Redirect ("main.aspx?ClassID=" & 
DataSet2.DefaultView.Table.Rows (0) ("ID")) 
End if 
Else 
' 获 取 数 据 库 连 接 字符 串 
StrCnn = 
System.Configuration.ConfigurationSettings.ApPSettings ("MM CONNECTION ST 
RING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
Cnn.Open () 
"查询 当前 班级 是 否 有 需要 批复 的 管理 员 申 请 信息 
Sql="Select ClassInfo.* from ClassInfo,UserClass Where 
ClassInfo.Id=ClassCode and shtag='1' and ClassInfo.Id=" & 
trim(request.Querystring ("ClassID")) & " and UserCode=" & 
trim(Request .Cookies ("id") .Value) & " and HF Admin='0' and AdminUser<>" & 
trim(Request .Cookies ("id") .value) 
Cmd=New OleDbCommand (sql,Cnn) 
DataR=Cmd .ExecuteReader () 
If DataR.Read () Then 
"存在 待 批复 的 管理 员 申请 信息 
"设置 用 于 弹出 页 面 的 Script 脚本 
Pop_Str="<script language=javascript>" 
Pop_Str=Pop_Str & "window.open('Pop_ Info.aspx?ClassId=" & 
teimtDatart iq)) "infos™ 
Pop_Str=Pop Str & 
"width=420px,height=300px,toolbar=no,menubar=no, left=0, top=0, scroll 
bars=yes, resizable=yes, location=no, status=no');</" 
Pop_Str=Pop_ Str & "script>" 
"执行 Script 脚本 ,弹出 批复 申请 页 面 
ClientScript.RegisterStartupScript (Me.GetType(), "",Pop_ Str) 
End If 
Cnn.Close () ' 关 闭 数据 库 连 接 
End if 
End If 
End If 
End Sub 
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下 面 ， 来 看 批复 申请 页 面 的 具体 实现 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Pop_Info.aspx。 由 于 该 页 面 为 弹 
出 窗口 页 面 ， 因 此 不 需要 加 载 页 面 模板 。 

(2) 在 页 面 中 添加 一 个 表单 Form， 并 设置 其 Runat 属性 为 Server。 然 后 ， 在 表单 Form 
中 插入 一 个 3 行 1 列 的 表格 ， 并 在 表格 中 添加 相应 的 文本 和 控件 ， 如 图 10.139 所 示 。 


0 
旧 的 班级 管理 员 ， A 


同意 | 不 同意 
图 10.139 ”表格 设计 
(3) 设置 表格 的 宽度 为 370px， 并 设置 文本 “班级 通告 ”的 字体 大 小 为 15 像素 ， 加 粗 


显示 。 

在 表格 中 ， 添 加 了 两 个 标签 控件 和 两 个 按钮 控件 。 其 中 ， 标 签 控 件 分 别 用 于 显示 申请 
担任 班级 管理 员 的 同学 名 称 和 当前 的 班级 名 称 ， 其 数据 的 加 载 将 在 页 面 的 Page_Load 事件 
中 执行 。 单 击 【 同 意 】 按 钮 ， 表 示 同 意 该 同学 对 班级 管理 员 的 申请 ， 该 按钮 控件 的 ID 为 
Agree， 单 击 事件 设置 为 Agree_Click; 单 击 【 不 同意 】 按 钮 ， 表 示 不 同意 该 同学 对 班级 管 
理 员 的 申请 ， 该 按钮 控件 的 ID 为 NotAgree， 单 击 事件 设置 为 NotAgree_Click。 

下 面 ， 来 看 页 面 加 载 时 所 执行 的 Page_ Load 事件 ， 其 代码 如 下 


【示例 代码 】 
Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn Rs String 
Dim DataR RS OleDbDataReader 
Dim Sql As String 
If Not IsPostBack() Then 
"获取 数据 库 连 接 字 符 串 
StrCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM_CONNECTION_ST 
RING_Cnn") 
Cnn = New OleDbConnection (StrCnn) 
Cnn.Open() ' 打 开 数 据 库 连 接 
' 查 询 当 前 的 班级 信息 及 待 批复 的 管理 员 信息 
Sql="Select ClassInfo.*,username from ClassInfo,UserSheet,UserClass 
where code=adminuser and ClassInfo.Id=ClassCode and shtag='1' and 
ClassInfo.Id=" & trim(request.Querystring("ClassID")) & " and UserCode=" & 
trim(Request .Cookies ("id") .Value) & " and HF Admin='0' and RdminUser<>" & 
trim(Request .Cookies ("id") .value) 
Cmd=New OleDbCommand (sql, Cnn) 
DataR=Cmd .ExecuteReader () 
If DataR.Read() Then 
"获取 申请 班级 管理 员 的 同学 姓名 
Labell .Text=DataR ("UserName") 


"获取 当前 班级 名 称 
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Labe12 .Text=DataR ("ClassName") 
"获取 申请 班级 管理 员 的 同学 ID， 并 将 其 赋予 全 局 共享 变量 SQStr 
SQStr=DataR ("AdminUser") 
End If 
cnn.Close() “关闭 数据 库 连 接 
End If 
End Sub 


该 页 的 Page_ Load 事件 主要 用 来 查询 当前 的 班级 信息 及 申请 班级 管理 员 的 同学 姓名 ， 
从 而 绑 定 页 面 上 相应 标签 控件 的 数据 显示 。 
对 于 两 个 按钮 控件 的 单 击 事件 ， 其 代码 如 下 : 


【示例 代码 】 

' 【同意 】 按 钮 的 单 击 事件 

Sub Agree Click(ByVal Sender As Object, ByVal E As EventArgs) 
PF_SQ(2) 

End Sub 

'【 不 同意 】 按 钮 的 单 击 事件 

Sub NotAgree Click(ByVal Sender As Object, ByVal E As EventArgs) 
PF_SQ(1) 

End Sub 


在 以 上 事件 代码 中 , 仅仅 是 调用 了 同一 个 自 定义 过 程 PF_SQO 来 执行 相应 的 数据 操作 。 
对 于 不 同 的 按钮 事件 ， 所 传递 的 参数 不 同 。 
下 面 ， 来 看 自 定义 过 程 PF_SQO 中 的 代码 。 


【示例 代码 】 
Sub PF _ SQ(Byval Tag As Integer) 
"变量 Tag 表示 当前 所 执行 的 操作 类 别 ， 其 值 为 1 表示 执行 不 同意 操作 ， 为 2 表示 执行 同意 操作 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim DataR AS OleDbDataReader 
Dim StrCnn Rs String 
Dim Sql As String 
Dim Num Agree As Integer ' 定 义 变量 Num _Agree， 用 于 存储 同意 批复 的 人 数 
Dim Num _NotAgree As Integer ' 定 义 变量 Num_NotAgree， 用 于 存储 不 同意 批复 的 人 数 
Dim Num Other Rs Integer ' 定 义 变 量 Num other， 用 于 存储 尚未 批复 的 人 数 
Dim Num Total Rs Integer ' 定 义 变量 Num Total， 用 于 存储 除 申 请 人 之 外 的 班级 总 人 数 
"获取 数据 库 连 接 字 符 串 
StrCnn = 
System.Configuration.ConfigurationSettings.ApPSettings ("MM CONNECTION ST 
RING Cnn") 
Cnn = New OleDbCconnection (StrCnn) 
cnn.open () “打开 数 据 库 连 接 
"统计 当前 对 班级 管理 员 申 请 的 批复 情况 
Sql= ”Select hf _ admin,count (*) as nums from userclass Where usercode<>" & 
trim(SQStr) & " and classcode=" & trim(request.Querystring("classid")) & " 


group by hf admin" 
Cmd=New OleDbCommand (Sql, Cnn) 
DataR=Cmd .ExecuteReader 
While DataR.Read() 
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If DataR("hf_admin")="1"” Then 
Num NotAgree=DataR("Nums") ' 获取 不 同意 人 数 
ElselIf DataR( "hf_admin" )="2" Then 
Num Agree=DataR("Nums") ' 获取 同意 人 数 
Else 
Num Other=DataR ("Nums") ' 获取 尚未 批复 的 人 数 
End If 
End While 
DataR.Close () 
"获取 可 对 班级 管理 员 申请 进行 批复 的 总 人 数 
Num Total=Num NotRgree+Num Agree+Num Other 
If Tag=1 Then 
'Tag 的 值 为 1， 表 示 执 行 的 是 不 同意 当前 对 班级 管理 员 的 申请 
Num_NotAgree=Num_NotAgree+1 ' 不 同意 人 数 加 1 
if (Num NotAgree/Num Total)>0.5 Then 
' 当 不 同意 人 数 超过 总 人 数 的 一 半 时 ， 班 级 管理 员 的 申请 失败 
"清空 班级 信息 表 classInfo 中 管理 员 申请 信息 
Sql="Update ClassInfo set AdminUser=0,shtag='0' where id=" & 
trim(request.Querystring ("classid")) 
Cmd=New OleDbCommand (Sql,Cnn) 
Cmd.ExecuteNonquery 
' 将 以 前 其 他 同学 对 班级 管理 员 申 请 的 批复 情况 置 为 初始 状态 
Sql="Update UserClass set hf admin='0' where classcode=" & 
trim(request .Querystring ("classid")) 
Cmd=New OleDbCommand (sql,cnn) 
Cmd.ExecuteNonquery 
Else 
' 不 同意 人 数 尚未 超过 总 人 数 的 一 半 ， 仅 更 新 当前 用 户 的 批复 情况 
Sql="update userclass set hf admin='1' where usercode=" & 
trim(request.Cookies ("id") .Value) & " and classcode=" & 
trim(request.Querystring ("classid")) 
Cmd=New OleDbCommand (sql,cnn) 
Cmd.ExecuteNonquery 
End if 
ElseIF Tag=2 Then 
"Tag 的 值 为 1， 表 示 执 行 的 是 同意 当前 对 班级 管理 员 的 申请 
Num_Agree=Num Agree+1 ' 同 意 人 数 加 1 
if (Num Agree/Num Total)>0.5 Then 
' 当 同意 人 数 超过 总 人 数 的 一 半 时 ， 班 级 管理 员 的 申请 成 功 
' 将 数据 表 classInfo 中 的 管理 员 申 请 审核 标志 置 为 2， 即 表示 已 申请 成 功 
Sql="Update ClassInfo set shtag='2' Where id=" & 
trim(request .Querystring ("classid")) 
Cmd=New OleDbCommand (Sql,cnn) 
Cmd.ExecuteNonquery 
' 将 以 前 其 他 同学 对 班级 管理 员 申 请 的 批复 情况 置 为 初始 状态 
Sql="Update UserClass set hf admin='0' where classcode=" & 
trim(request .Querystring ("classid")) 
Cmd=New OleDbCommand (Sql,Cnn) 
Cmd.ExecuteNonquery 
Else 


"同意 人 数 尚 未 超过 总 人 数 的 一 半 ， 仅 更 新 当前 用 户 的 批复 情况 
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Sql="update userclass set hf admin='2' Where usercode=" & 
trim(request.Cookies ("id") .Value) & " and classcode=" & 
trim(request .Querystring ("classid")) 

Cmd=New OleDbCommand (Sql,Cnn) 

Cmd.ExecuteNonquery 

End if 
End If 
cnn.close() “' 关 闭 数据 库 连接 
"执行 客户 端 脚本 ， 关 闭 当前 页 面 
ClientScript.RegisterStartupScript (Me.GetType () "",CloseWindow()) 
End Sub 


以 上 代码 执行 时 ， 首 先 获 取 当 前 对 班级 管理 员 申请 的 批复 情况 ， 包 括 已 同意 申请 的 人 
数 、 不 同意 申请 的 人 数 、 尚 未 批复 的 人 数 以 及 总 人 数 。 然 后 ， 根 据 参 数 Tag 的 值 来 判断 当 
前 所 要 执行 的 操作 。 

当 Tag 的 值 为 1 时 ， 表 示 用 户 在 批复 时 单 击 的 是 【不 同意 】 按 钮 ， 此 时 将 不 同意 人 数 
加 1。 如 果 不 同意 人 数 超过 总 人 数 的 一 半 ， 则 表示 当前 对 班级 管理 员 的 申请 失败 ， 应 清空 
相关 的 班级 管理 员 申请 信息 ;如 果 不 同意 人 数 尚 未 超过 总 人 数 的 一 半 ， 则 仅 更 新 当前 用 户 
对 班级 管理 员 申请 的 批复 情况 。 

当 Tag 的 值 为 2 时 ， 表 示 用 户 在 批复 时 单 击 的 是 【同意 】 按 钮 ， 此 时 将 同意 人 数 加 1。 
如 果 同 意 人 数 超过 总 人 数 的 一 半 ， 则 表示 当前 对 班级 管理 员 的 申请 成 功 ， 应 将 ClassInfo 数 
据 表 中 标识 管理 员 申 请 的 标志 ShTag 置 为 2， 如 果 同 意 人 数 尚未 超过 总 人 数 的 一 半 ， 则 仅 
更 新 当前 用 户 对 班级 管理 员 申 请 的 批复 情况 。 

在 ClientScript.RegisterStartupScript() 方 法 中 所 调用 的 用 于 执行 关闭 当前 页 面 操作 的 自 
定义 函数 CloseWindow0 在 上 一 小 节 中 己 经 进行 了 说 明 ， 这 里 不 再 介绍 。 

至 此 ， 已 实现 了 批复 申请 页 面 应 有 的 功能 ， 页 面 预览 效果 如 图 10.140 所 示 。 


加 班级 通告 - Microsoft Internet Explorer 


班级 通告 
贵 班 同 学 许 宾 已 申请 担任 贵 班 94 计算机 应 用 一 班 ) 的 班级 管理 
员 ， 请 您 对 此 发 表 您 的 意见 ? 


EL 


10.140 ”页 面 预览 效果 
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10.8 搜索 学 校 /班级 


在 同学 录 系 统 中 ， 对 学 校 的 搜索 和 班级 的 搜索 是 在 同一 页 面 中 实现 的 。 事 实 上 ， 要 搜 
索 班级 ， 首 先 必 须 找到 其 所 在 的 学 校 ， 然 后 在 该 学 校 的 班级 列表 中 才能 寻找 相应 的 班级 。 


10.8.1 快速 搜索 


新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Search.aspx。 选 择 【 修 改 】|【 模 板 】| 
【套用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】。 单 击 【确定 】 
按钮 ， 将 模板 应 用 到 本 页 面 。 

(1) 在 表单 Form 中 ， 插 入 一 个 3 行 3 列 的 表格 table2， 其 属性 设置 如 图 10.141 所 示 。 


国 | 表格 Id FE ”“” 宽 Bs0 人 [ 太 和 可 ”填充 5 ”对齐 | 忆 中 对 可 类 [元 ”可 © 

oH [ea 列 B 两 | ”| 全 来 到 ”间距 5 ”过 框 
SE 
到 到 到 背景 图 信人 厂 @ 已 


10.141 表格 属性 


(2) 分 别 合并 表格 第 1 行 和 第 3 行 的 3 个 单元 格 ， 并 分 别 设置 其 背景 图 片 为 Image 目 
录 下 的 lybg_1.gif 和 1ybg_ 2.gif。 然 后 ， 分 别 设置 表格 第 2 行 的 第 1 个 单元 格 和 第 3 个 单元 
格 的 背景 图 片 为 Image 目录 下 的 lybg 3.gif 和 1lybg 4.gif。 

(3) 在 表格 第 2 行 的 第 2 个 单元 格 中 再 次 插入 一 个 5 行 1 列 的 表格 table3， 该 表格 用 
于 布局 用 来 设置 相关 搜索 条 件 的 文本 框 和 下 拉 列 表 框 控件 ， 其 表格 设计 如 图 10.142 所 示 。 


图 10.142 表格 设计 


在 此 表格 中 ， 插 入 了 两 个 下 拉 列 表 框 (DropDownLisb 控 件 ， 分 别 用 于 列 出 学 校 类 型 和 
所 属 省 份 ， 以 便 用 户 选择 。 其 中 ， 学 校 类 型 下 拉 列 表 框 中 的 选项 包括 “大 学 ”、“ 中 专 ”、 
“中 学 ”以 及 “小 学 ”， 其 代码 如 图 10.143 所 示 。 


<td align= "left”style=“padding-left:10px; > 
《asp:DropDownList ID="TType”zrunat="serVer "> 
《asp:ListItem Value=“ 大 学 "> 大 学 人 /asp:ListItenm> 
《<asp:ListItem Value= "中考 " > 中 考 C/asp:ListIten> 
《<asp:ListItem Yalue=“ 中 学 “> 中 学 Crasp:ListItenm> 
《<asp:ListItem Yalue=" 小 学 "> 小 学 /asp:ListIten> 
<f asp:DropDownList> 
/td> 


10.143 ”DropDownList 控件 设计 代码 
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对 于 【所 属 省 份 】 下 拉 列 表 框 中 的 数据 ， 这 里 采用 了 动态 绑 定 的 方式 。 虽 然 全 国 的 省 
份 、 直 辖 市 是 固定 的 ， 但 其 数量 较 多 ， 采 用 静态 方式 直接 添加 列表 项 较为 麻烦 。 为 此 ， 在 
数据 库 中 特别 添加 了 一 个 数据 表 SYS_PROVINCE， 用 于 存储 全 国 的 省 份 信息 。 

在 绑 定 【所 属 省 份 】 下 拉 列 表 框 中 的 数据 之 前 ， 需 要 创建 一 个 数据 集 。 

(4) 打开 【服务 器 行为 】 面 板 ， 单 击 画 按 钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 名 称 为 DataSetl ， 连 接 选 择 Cnn， 表 格 选择 
SYS_PROVINCE， 排 序 方式 设置 为 按 字段 ID 升序 排序 ， 如 图 10.144 所 示 。 


EE | 
ee we | 
二 所 Fn 职 油 
和 | 
了 下 过 | 


图 10.144 创建 数据 集 DataSet1 

(5) 单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 。 在 【设计 】 视 图 ， 选 择 并 右 击 列举 省 份 

的 下 拉 列 表 杠 控件， 在 弹出 的 菜单 中 选择 【编辑 标签 】 命 令 ， 此 时 将 弹出 【标签 编辑 器 】 
对 话 框 。 选 择 【 数 据 】 分 类 ， 如 图 10.145 所 示 。 


标签 锭 辑 器 - DropDownList 


图 10.145 【标签 编辑 器 】 对 话 框 


(6) 设置 【数据 源 】 为 <%# DataSetl.DefaultView %>， 【数据 文本 字段 】 为 Province， 
【数据 值 字段 】 为 Province。 单 击 【确定 】 按 钮 ， 完 成 数据 绑 定 的 设置 。 

单 击 【搜索 】 按 钮 ， 页 面 将 根据 用 户 输入 或 选择 的 各 项 条 件 对 学 校 信息 进行 检索 ， 检 
索 结果 通过 一 个 记录 集 来 获取 。 

(7) 在 【服务 器 行为 】 面 板 中 ， 再 次 单 击 画 按钮 ， 并 在 弹出 的 菜单 中 选择 【数据 集 】 
命令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 的 高 级 模式 。 
在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 设 置 名 称 为 DataSet2， 连 接 为 Cnn。 
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由 于 搜索 条 件 包含 3 个 ， 因 此 这 里 必须 定义 3 个 参数 ， 分 别 获取 3 个 搜索 条 件 的 值 。 
(8) 单 击 【添加 参数 】 按 钮 国 ， 在 弹出 的 【编辑 参数 】 对 话 框 中 ， 设 置 【 名 称 】 为 
@SchoolName，【 类 型 】 为 VarChar， 如 图 10.146 所 示 。 


本 TREE 
wu 可 职 消 
全 : E| 天助 
I 
建立 


10.146 【编辑 参数 】 对 话 框 


(9) 单 击 【 建 立 】 按 钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 设置 【名 称 】 为 SchoolName， 
【 源 】 为 【表单 变量 】， 如 图 10.147 所 示 。 


10.147 【生成 值 】 对 话 框 
(10) 单 击 【确定 】 按 钮 ， 完 成 此 参数 的 设置 。 重 复 以 上 步骤 ， 再 次 添加 两 个 参数 ， 其 
参数 名 分 别 为 @ProVince 和 @TType， 其 参数 值 分 别 设置 为 表单 变量 Province 和 表单 变量 
Ttype。 
完成 参数 设置 后 ， 在 SQL 文本 框 中 输入 以 下 SQL 语句 : 


SELECT * FROM schoolinfo WHERE schoolname like '%' + ? + '%' and province=? 
and type=? ORDER BY id 


在 该 语句 中 ， 对 学 校 名 称 的 匹配 采用 了 like 子 语句 ， 即 模糊 匹配 。 数 据 集 的 设置 如 
图 10.148 所 示 。 


10.148 ”创建 数据 集 DataSet2 
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(11) 单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet2 的 创建 ， 该 数据 集 将 返回 符合 搜索 条 件 
的 所 有 学 校 信息 。 

接 下 来 ， 实 现 搜 索 结果 的 显示 。 考 虑 到 当 用 户 第 一 次 加 载 此 页 面 时 ， 并 不 执行 搜索 操 
作 ( 即 无 须 显示 搜索 结果 )， 因 此 在 搜索 结果 区 域 需要 添加 一 个 Panel 控件 ， 用 于 控制 搜索 结 
果 区 域 的 显示 与 否 。 

(12) 在 表格 table2 之 后 ， 插 入 一 个 Panel 控件 ， 并 设置 其 ID 为 Panell。 然 后 ， 在 【 服 
务 器 行为 】 面 板 中 ， 单 击 加 按钮 ， 在 弹出 的 菜单 中 选择 【数据 网 格 】 命 令 。 在 弹出 的 【 数 
据 网 格 】 对 话 框 中 ， 设 置 ID 为 DataGrid1，【 数 据 集 】 为 DataSet2，【 导 航 】 项 为 【编号 
链接 到 每 一 页 】， 如 图 10.149 所 示 。 
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图 10.149 【数据 网 格 】 对 话 杠 


(13) 在 【 列 】 列 表 框 中 ， 选 择 字段 ID， 单 击 【 编 辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 
列 】 对 话 框 中 设置 【标题 】 为 【编号 】， 如 图 10.150 所 示 。 


图 10.150 【简单 数据 字段 列 】 对 话 框 


(14) 单 击 【确定 】 按 钮 ， 返 回 【数据 网 格 】 对 话 框 。 重 复 以 上 操作 ， 分 别 设置 字段 
SchoolName、Province、Type、CreateDate 的 标题 名 称 为 “学 校 名 称 ”、“ 学 校 类 型 ”、“ 所 
属 省 份 ” 和 “创建 时 间 ”。 

(15) 为 了 在 显示 学 校 名 称 的 列 中 创建 链接 ， 需 要 更 改 该 列 的 类 型 。 选 择 【 学 校 名 称 】 
列 ， 单 击 【 更 改 列 类 型 】 按 钮 ， 在 弹出 的 菜单 中 选择 【超级 链接 】 命 令 ， 在 弹出 的 【超级 
链接 列 】 对 话 框 中 ， 设 置 【超级 链接 文本 】 为 数据 字段 SchooIName， 【链接 页 】 为 数据 字 
段 ID，【 格 式 字符 串 】 为 “School Info.aspx?id={0}”， 如 图 10.151 所 示 。 
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10.151 【超级 链接 列 】 对 话 框 


(16) 单 击 【 确 定 】 按 钮 ， 返 回 【 数 据 网 格 】 对 话 框 ， 再 次 单 击 【 确 定 】 按 钮 ， 完 成 数 
据 网 格 的 创建 。 

(17) 为 了 设置 搜索 结果 为 空 时 的 提示 信息 ， 在 定义 数据 网 格 之 后 输入 文本 “没有 符合 
查询 条 件 的 学 校 信息 ， 请 重新 搜索 ! ”， 并 设置 其 字体 颜色 为 红色 。 然 后 选择 该 文本 ， 在 
【服务 器 行为 】 面 板 中 ， 单 击 画 按钮 ， 从 弹出 的 菜单 中 选择 【显示 区 域 】|【 数 据 集 为 空 时 
显示 】 命 令 。 在 弹出 的 【数据 集 为 空 时 显示 】 对 话 框 中 ,选择 数据 集 DataSet2， 如 图 10.152 
所 示 。 


图 10.152 【数据 集 为 空 时 显示 】 对 话 框 


单 击 【确定 】 按 钮 ， 完 成 该 显示 区 域 的 设置 。 
(18) 当 用 户 没有 搜索 到 自己 所 需要 的 学 校 时 ， 应 该 提供 注册 新 学 校 的 按钮 。 为 此 ， 还 
需 在 页 面 上 添加 一 个 按钮 控件 ， 其 文本 为 “注册 新 学 校 ”， 同 时 设置 其 单 击 事件 为 
AddSchool Click。 
切换 至 【代码 】 视 图 ， 添加 【注册 新 学 校 】 按 钮 的 单 击 事件 ， 其 代码 如 下 : 
【示例 代码 】 
Sub Addschool Click(ByVal Sender As Object, ByVal E As EventArgs) 
' 将 页 面 跳 转 至 新 增 学 校 功 能 页 面 
Response.Redirect ("School Add.aspx") 
End sub 


该 事件 仅 实现 一 个 链接 功能 ， 即 将 页 面 跳 转 至 新 增 学 校 的 功能 页 面 School_Add.aspx。 

(19) 再 来 看 页 面 加载 时 所 执行 的 Page_Load 事件 ， 该 事件 主要 用 于 控制 搜索 结果 区 域 
的 显示 与 否 ， 其 代码 如 下 : 

【示例 代码 】 


Sub Page Load(ByVal Sender As Object, ByVal E As EventArgs) 
If Not IsPostBack() Then 
" 当 页 面 为 初次 加 载 时 ， 不 显示 搜索 结果 区 域 
Panel1.Visible=False 
Else 
" 当 页 面 由 数据 提交 而 导致 再 次 加 载 时 ， 显 示 搜 索 结果 区 域 


panel1.Visible=True 
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End If 
End sub 


至 此 ， 页 面 功能 全 部 完成 ， 页 面 预览 


wa 
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览 效 果 如 图 10.153 所 示 。 


EE 


Tr 


10.153 ”页 面 预览 效果 


当 用 户 设置 了 相应 的 搜索 条 件 时 ， 单 击 【 搜 索 】 按 钮 ， 即 可 在 下 方 显示 搜索 结果 ， 如 


图 10.154 所 示 。 


前 号 学 校 各 称 学 校 并 型 所 属 者 位 人 时 间 
1 A 好 Ea 20062.113:1245 
3 重庆 到 科大 学 E> ER 2006-2.6 15:21:18 
4 好 Em 2006.27 19.20115 
Eos 
9 
I £7 


10.8.2 ”查看 班级 列表 


在 学 校 搜索 的 结果 列表 


10.154 ”搜索 结果 


Ph， 单 击 相 应 的 学 校 名 称 链接 ， 即 可 打开 新 的 页 面 来 查看 该 学 


校 的 注册 班级 信息 。 
一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 School Info.aspx。 选 择 【 修 改 】|【 模 


新 到 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】 命 令 。 单 
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击 【 确 定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 
1. 创建 两 个 数据 集 


首先 ， 创 建 两 个 数据 集 ， 分 别 用 于 获取 当前 学 校 的 基本 信息 及 所 有 班级 信息 。 

(1) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 剧 按钮 ， 从 弹出 的 
菜单 中 选择 【数据 集 】 命令 。 在 弹出 的 【数据 集 】 对 话 框 中 ， 设 置 数据 集 名 称 为 DataSetl， 
连接 选择 Cnn, 表格 选择 SchoolInfo, 筛选 条 件 设 置 为 字段 ID 等 于 URL 参数 帮 , 如 图 10.155 
所 示 。 


图 10.155 创建 数据 集 DataSet1 


(2) 单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 ， 该 数据 集 将 返回 指定 班级 的 基 
本 信息 。 重 复 以 上 操作 ， 再 次 新 增 一 个 数据 集 。 在 此 数据 集中 ， 设 置 名 称 为 DataSet2， 表 
格 选择 ClassInfo， 筛 选 条 件 设置 为 字段 SchoolID 等 于 URL 参数 ID。 在 【 列 】 选 项 组 中 ， 
选择 【 选 定 的 】 单 选 按钮 ， 并 在 下 面 的 列表 框 中 选择 ClassName、CreateDate、Grade、ID 
四 个 字段 (在 选中 一 项 后 ， 按 住 Ctrl 键 ， 可 同时 选择 其 他 项 )， 如 图 10.156 所 示 。 


图 10.156 创建 数据 集 DataSet2 


单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet2 的 创建 ， 该 数据 集 将 返回 指定 学 校 下 的 所 有 
班级 信息 。 
(3) 返回 页 面 的 【设计 】 视 图 ,在 表单 Form 内 输入 文本 “当前 学 校 : ”。 然后 , 在 【 绑 
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定 】 面 板 中 选择 并 展开 数据 集 DataSet1, 拖 动 字段 SchoolName 至 文本 “当前 学 校 : ”之 后 ， 
同时 设置 其 颜色 为 红色 。 

(4) 将 光标 移 至 上 步 插入 的 动态 文本 之 后 ， 按 Enter 键 换行 。 在 【服务 器 行为 】 面 板 
中 ， 单 击 田 按钮， 从 弹出 的 菜单 中 选择 【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 
中 设置 ID 为 DataGrid1， 数 据 集 选 择 DataSet2， 设 置 一 次 显示 10 条 记录 , 【导航 】 选 项 设 
置 为 【编号 链接 到 每 一 页 】， 如 图 10.157 所 示 。 


个 所 有 记录 
| 
列 :回电 回回 


Classlne 简单 数据 字段 


Grade 简单 数据 字段 
m 简单 数据 字段 


10.157 【数据 网 格 】 对 话 框 


(5) 这 里 ， 字 段 在 【 列 】 列 表 框 中 的 顺序 与 在 数据 网 格 中 所 要 显示 的 顺序 稍 有 出 入 ， 
单 击 窗 按 钮 和 雪 按 钮 ,可 调整 选择 列 的 位 置 。 调 整 后 的 列 按 从 上 到 下 的 排列 , 其 顺序 为 ID、 
ClassName、 Grade、CreateDate。 

(6) 选中 字段 ID, 单 击 【 编 辑 】 按钮 , 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 设置 【 标 
题 】 为 “班级 编号 ”， 如 图 10.158 所 示 。 


简单 数据 字 及 列 x 


图 10.158 【简单 数据 字段 列 】 对 话 框 


(7) 重复 以 上 操作 ， 分 别 设置 字段 ClassName、Grade、CreateDate 的 标题 为 “班级 名 
称 ”、“ 年 级 ”和 “创建 时 间 ”。 单 击 【 添 加 列 】 按 钮 丁 ， 从 弹出 的 菜单 中 选择 【删除 按 
钮 】 命 令 ， 在 弹出 的 【删除 按钮 列 】 对 话 框 中 设置 【标题 】 为 “加 入 该 班级 ”，【 按 钮 类 
型 】 为 【链接 按钮 】， 如 图 10.159 所 示 。 


10.159 【删除 按钮 列 】 对 话 框 
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单 击 【 确 定 】 按 钮 ， 完 成 该 列 的 添加 。 

前 面 提 到 过 ， 虽 然 使 用 的 是 【删除 按钮 】 命 令 ， 但 所 执行 的 并 不 是 删除 操作 ， 而 是 自 
定义 的 加 入 班级 操作 。 之 所 以 选择 【删除 按钮 】 命 令 ， 只 是 借用 这 种 便捷 方式 来 快速 添加 
一 个 按钮 列 。 随 后 ， 将 会 修改 默认 的 删除 事件 为 自 定义 的 事件 。 这 种 创建 按钮 列 的 方法 并 
不 值得 推荐 ， 虽 简捷 ， 但 却 不 易 让 人 理解 ， 甚 至 会 造成 误 操作 (如 果 没 有 修改 默认 的 删除 事 
件 ， 系 统 将 会 执行 删除 操作 )。 事 实 上 ， 用 户 也 可 直接 修改 【数据 网 格 】 服 务 器 行为 面板 对 
应 的 代码 ， 来 添加 一 个 按钮 列 ， 这 才 是 值得 推荐 的 方法 。 

在 【数据 网 格 】 对 话 框 中 ， 单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 的 创建 。 

(8) 在 【设计 】 视 图 中 , 选择 并 右 击 数据 网 格 DataGrid1, 从 弹出 的 快捷 菜单 中 选择 【 编 
辑 标签 】 命 令 。 在 弹出 的 【标签 编辑 器 】 对 话 框 中 选择 【布局 】 分 类 ， 在 右边 的 列表 框 中 
设置 宽度 值 为 80%; 同时 ， 选 择 【 事 件 】 分 类 下 的 OnItemCommand， 并 设置 其 事件 名 为 
DataGridl Mod。 单 击 【确定 】 按 钮 ， 完 成 对 数据 网 格 的 设置 。 

(9) 切换 至 【代码 】 视 图 ， 添 加 当 单 击 数据 网 格 中 的 【加 入 该 班级 】 链 接 按钮 时 所 触 
发 的 事件 DataGridl Mod， 其 代码 如 下 : 

【示例 代码 】 

Sub DataGridl Mod(ByVal Sender As Object, ByVal E As 

DataGridCommandEventArgs) 

"获取 所 要 加 入 的 班级 TID 

Dim codestr As String = E.Item.Cells(0).Text 
Dim Cnn As OleDbConnection 

Dim Cmd As OleDbCommand 

Dim DataR As OleDbDataReader 


Dim StrCnn Rs String 
Dim Sql As String 


If CType (e.CommandSource, LinkButton) .CommandName = "Delete" Then 
"获取 数据 库 连 接 字 符 串 
StrCnn = 
System.Configuration.ConfigurationSettings.APPSettings ("MM_CONNECTION_ST 
RING_Cnn") 
"创建 数据 库 连 接 
Cnn = New OleDbConnection (StrCnn) 
Cnn.open () 
' 查 询 当 前 用 户 是 否 已 是 所 要 加 入 的 班级 中 的 成 员 
Sql = "select * from userclass where usercode=" & 


trim(request .Cookies ("id") .value) & " and classcode=" & trim(Codestr) 
Cmd = New OleDbCommand (sql, Cnn) 
DataR=Cmd .ExecuteReader 
if DataR.Read() Then 
"当前 用 户 已 是 所 要 加 入 的 班级 中 的 成 员 ， 提 示 相 关 信息 


Cnn.Close () 


ClientScript.RegisterStartupScript (Me.GetType (), "",， GetInfo(" 您 已 经 
是 该 班级 成 员 ， 无 须 再 次 加 入 ! ")) 
else 


' 当前 用 户 不 是 所 要 加 入 的 班级 中 的 成 员 ， 建 立 当前 用 户 与 指定 班级 的 关联 
DataR.Close() 
"向 数据 表 Userclass 中 插入 一 条 记录 
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Sql="Insert into userclass (usercode,classcode) Values (" & 
trim(request.Cookies("id") .value) & "," & trim(CodeStr) & ")" 

Cmd=New OleDbCommand (Sql,Cnn) 

Cmd.ExecuteNonquery 

Cnn-Close () 

Clientscript.Registerstartupscript (Me.GetType () ，""，GetInfo(" 加 入 成 
功 ! ")) 

End If 
End If 

End sub 


最 后 ， 还 需 添加 一 个 【注册 新 班级 】 按 钮 ， 该 按钮 主要 用 于 在 当前 指定 的 学 校 下 新 增 
一 个 班级 信息 。 按 钮 所 定义 的 单 击 事件 为 AddClass_Click， 所 执行 的 操作 是 将 页 面 跳 转 至 
新 增 班 级 页 面 Class_Add.aspx， 其 代码 如 下 : 


【示例 代码 】 


Sub AddClass Click(ByVal Sender As Object, ByVal E Rs EventArgs) 
"将 页 面 跳 转 至 新 增 班级 的 功能 页 面 ， 同 时 将 当前 的 学 校 ID 作为 其 页 面 参数 进行 传递 
Response.Redirect ("Class Add.aspx?SchoolID=" & 

request .Querystring ("id")) 

End sub 


至 此 ， 页 面 功能 全 部 完成 ， 页 面 预览 效果 如 图 10.160 所 示 。 
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图 10.160 页面 预览 效果 
10.9 新 增 信 息 


此 类 页 面 主要 包括 新 增 学 校 和 新 增 班级 两 个 页 面 。 
10.9.1 ”新 增 学 校 
在 新 增 学 校 页 面 中 ， 主 要 实现 了 新 学 校 的 注册 功能 。 
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(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 School Add.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命令， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模 板 】 命 令 。 
单 击 【 确 定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 由 于 新 增 学 校 页 面 的 布局 与 搜索 学 校 页 面 中 的 搜索 条 件 部 分 的 布局 较为 相似 ， 因 
此 可 将 搜索 学 校 页 面 的 部 分 界面 设计 代码 直接 拷贝 过 来 。 选 择 并 复制 搜索 学 校 页 面 中 的 表 


格 Table2， 然 后 粘贴 至 本 页 面 所 定义 的 表单 Form 中 。 
(3) 调整 表格 Table2 和 媒 套 表格 Table3 的 样式 ， 及 相应 的 文本 ， 如 图 10.161 所 示 。 


注册 新 学 校 


注册 
10.161 表格 设计 


(4) 为 了 绑 定 【 所 属 省 份 】 下 拉 列 表 框 的 数据 显示 ， 仍 需 创建 一 个 数据 集 DataSetl 。 
由 于 数据 集 不 能 跨 页 面 复制 ， 因 此 只 能 新 建 ， 其 数据 集 的 设置 与 搜索 学 校 页面 中 的 数据 集 


DataSetl 完全 一 样 ， 如 图 10.162 所 示 。 
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图 10.162 ”数据 集 DataSet1 

为 了 实现 数据 的 新 增 ， 需 要 创建 一 个 【插入 记录 】 服 务 器 行为 。 

(5) 打开 【服务 器 行为 】 面板 ， 单 击 剧 按钮 ， 从 弹出 的 菜单 中 选择 【插入 记录 )】 命令 。 
在 弹出 的 【插入 记录 对话 框 中 ,将 【连接 2 选项 设 为 Cnn,【 插 入 到 表格 ] 选 项 设 为 SchoolInfo， 
同时 设置 提交 成 功 后 所 转向 的 页 面 为 School Add.aspx， 如 图 10.163 所 示 。 

(6) 在 列 的 设置 中 ， 分 别 设置 字段 Province、SchoolName 和 Type 的 获取 值 为 表单 元 
素 Province、SchoolNamet 和 Ttype 的 取 值 。 

(7) 单 击 【确定 】 按 钮 ， 完 成 【插入 记录 】 服 务 器 行为 的 添加 。 

至 此 ， 新 增 学校 页 面 的 功能 完成 ， 页 面 预览 效果 如 图 10.164 所 示 。 
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10.163 【插入 记录 】 对 话 框 
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图 10.164 ”页 面 预览 效果 
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10.9.2 ”新 增 班级 


新 增 班级 页 面 主要 用 于 在 指定 的 学 校 下 添加 新 的 班级 信息 。 
(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Class_Add.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】 命 令 。 


单 击 【确定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 


(2) 新 增 班 级 页 面 的 布局 与 新 增 学 校 页 面 的 布局 较为 相似 ， 因 此 可 将 新 增 学 校 页 面 中 
的 表格 table2 直接 复制 过 来 ， 并 对 其 嵌 套 表格 table3 的 布局 及 内 容 进行 修改 ， 修 改 后 的 表 


格 布局 如 图 10.165 所 示 。 


在 文本 “所 属 学 校 ” 后 的 单元 格 中 ， 插 入 了 一 个 隐藏 域 ， 该 隐藏 域 用 于 存储 当前 的 学 
校 ID， 以 便 在 定义 【插入 记录 】 服 务 器 行为 时 使 用 。 

(3) 在 【服务 器 行为 】 面 板 中 单 击 轩 按钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 在 
弹出 的 【数据 集 】 对 话 框 中 设置 其 名称】 为 DataSetl 【连接 为 Cnn,【 表 格 ] 为 SchoolInfo， 
筛选 条 件 设 置 为 字段 ID 等 于 URL 参数 SchoolID， 如 图 10.166 所 示 。 
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图 10.166 创建 数据 集 DataSet1 


单 击 【 确 定 】 按钮 ， 完成 数据 集 DataSetl 的 创建 , 该 数据 集 将 返回 指定 ID 的 学 校 信息 。 

(4) 在 【 绑 定 】 面 板 中 ， 选 择 并 展开 数据 集 DataSetl ， 拖 动 字段 SchoolName 至 表格 中 
的 隐藏 域 之 前 ， 并 设置 其 字体 颜色 为 红色 。 

(5) 在 【设计 】 视 图 中 选择 隐藏 域 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 【编辑 标签 】 命 
令 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 设置 名 称 为 SchoolID， 其 值 为 “<%# 
DataSetl.FieldValue("id", Container) %>”， 如 图 10.167 所 示 。 


10.167 ”编辑 隐藏 域 


单 击 【 确 定 】 按 钮 ， 完 成 对 隐藏 域 的 设置 。 
(6) 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 加 按钮 ， 从 弹出 的 
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菜单 中 选择 【插入 记录 】 命 令 。 在 弹出 的 【插入 记录 】 对 话 框 中 , 将 【连接 】 选 项 设 为 Cnn， 
【插入 到 表格 】 选 项 设 为 Classmfo。 然 后 ， 分 别 设置 字段 ClassName、Grade、SchoolID 的 
获取 值 为 表单 元 素 ClassName、Grade 和 SchoolID 的 取 值 。 最 后 ， 设 置 数据 提交 成 功 后 所 
转向 的 页 面 为 “School Info.aspx?id= <%# DataSetl FieldValue("SchoolID", Container) %>”， 
如 图 10.168 所 示 。 
单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 的 添加 。 
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图 10.168 【插入 记录 】 对 话 框 


至 此 ， 新 增 班级 的 页 面 功能 完成 ， 页 面 预览 效果 如 图 10.169 所 示 。 
当 页 面 提交 成 功 后 ， 系 统 将 自动 转向 当前 学 校 的 班级 列表 页 面 。 
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10.169 页面 预览 效果 


10.10 搜索 同学 


在 同学 录 的 主页 面 上 ， 还 提供 了 一 项 搜索 功能 ， 那 就 是 搜索 同学 。 本 节 将 介绍 搜索 同 
学 页 面 功能 的 具体 实现 。 
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(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 , 将 其 命名 为 Search_Classmate.aspx。 选 择 【 修 
改 】I【 模 板 】|【 套 用 模板 到 页 】 命令, 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【页 面 模板 】。 
单 击 【确定 】 按 钮 ， 将 模板 应 用 到 本 页 面 。 

(2) 选择 并 复制 搜索 学 校 页 面 中 的 表格 table2， 然 后 粘贴 至 本 页 面 。 调 整 其 典 套 表格 
table3 的 布局 ， 如 图 10.170 所 示 。 


二 
ee 
10.170 ”调整 字 的 表格 
(3) 打开 【服务 器 行为 】 面 板 单 击 型 按钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 在 
弹出 的 【数据 集 】 对 话 框 中 ， 单 击 【 高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 
在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 设 置 【名 称 】 为 DataSetl ，【 连 接 】 为 Cnn。 
(4) 为 了 匹配 用 户 所 输入 的 查询 条 件 ， 需 要 创建 一 个 参数 。 单 击 【添加 参数 】 按 钮 本， 


在 弹出 的 【编辑 参数 】 对 话 框 中 ， 设 置 【 名 称 】 为 “@TxName”，【 类 型 】 为 VarChar， 
如 图 10.171 所 示 。 


10.171 【编辑 参数 】 对 话 框 


(5) 单 击 【 建 立 】 按钮 ,在 弹出 的 【生成 值 】 对话 框 中 设置 【名 称 】 为 TxName, 【 源 】 
为 【表单 变量 】， 如 图 10.172 所 示 。 


10.172 【生成 值 】 对 话 框 


(6) 单 击 【确定 】 按 钮 ， 完 成 此 参数 的 设置 。 然 后 ， 在 SQL 文本 框 中 输入 以 下 SQL 
语句 : 

SELECT 

sersheet .code, username, schoolname, classname, sex, tell,email,address FROM 

usersheet,userclass,classinfo, schoolinfo WHERE usersheet.code=usercode 

and classcode=classinfo.id and schoolid=schoolinfo.id and username like '%' 

+ 2? + '%' ORDER BY code 


在 该 语句 中 ， 对 同学 姓名 的 匹配 采用 了 like 子 语句 ， 即 模糊 匹配 ， 如 图 10.173 所 示 。 
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10.173 ”创建 数据 集 DataSet1 


单 击 【和 确定】 按钮 ， 完 成 数据 集 DataSetl 的 创建 ， 该 数据 集 将 返回 符合 搜索 条 件 的 所 
有 同学 信息 。 

(7) 在 表格 table2 之 后 ， 插 入 一 个 Panel 控件 (用 于 控制 搜索 结果 区 域 的 显示 与 否 )， 并 
设置 其 ID 为 Panell。 然 后 ， 在 【服务 器 行为 】 面 板 中 单 击 剧 按 钮 ， 从 弹出 的 菜单 中 选择 
【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 中 ， 设 置 ID 为 DataGrid1，【 数 据 集 】 
为 DataSetl，【 导航 】 为 【编号 链接 到 每 一 页 】， 然 后 依次 设置 各 列 所 对 应 的 标题 ， 如 
图 10.174 所 示 。 


10.174 【数据 网 格 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 的 创建 。 

(8) 在 所 定义 数据 网 格 之 后 输入 文本 “没有 符合 查询 条 件 的 同学 信息 , 请 重新 搜索 ! ”， 
并 设置 其 字体 颜色 为 红色 。 然 后 ， 选 择 该 文本 ， 在 【服务 器 行为 】 面 板 中 单 击 固 按 钮 ， 从 
弹出 的 菜单 中 选择 【显示 区 域 】|【 数 据 集 为 空 时 显示 】 命 令 。 在 弹出 的 【数据 集 为 空 时 显 
示 】 对 话 框 中 ， 选 择 数据 集 DataSetl ， 如 图 10.175 所 示 。 
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10.175 【数据 集 为 空 时 显示 】 对 话 框 


单 击 【确定 】 按 钮 ， 完 成 该 显示 区 域 的 设置 。 
(9) 切换 至 【代码 】 视 图 ， 添 加 页 面 加 载 时 所 执行 的 Page Load 事件 ， 其 代码 如 下 : 


【示例 代码 】 
Sub Page Load(BYVal Sender As Object, ByVal E As EventArgs) 
If Not IsPostBack() Then 
" 当 页 面 为 初次 加 载 时 ， 不 显示 搜索 结果 区 域 
Panell.Visible=False 
Else 
' 当 页 面 由 数据 提交 而 导致 再 次 加 载 时 ， 显 示 搜索 结果 区 域 
panell.Visible=True 
End If 
End sub 


在 该 事件 中 ,根据 Page 对 象 的 IsPostBack 属性 来 判断 页 面 是 否 为 初次 加 载 ， 并 依 此 控 
制 搜索 结果 区 域 的 显示 与 否 。 
至 此 ， 页 面 功能 全 部 完成 ， 页 面 预 览 效果 如 图 10.176 所 示 。 


10.176 页面 预览 效果 


输入 所 要 搜索 的 同学 姓名 , 单 击 【 搜 索 】 按 钮 ， 即 可 在 下 方 显示 搜索 结果 ,如 图 10.177 
所 示 。 
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图 10.177 ”搜索 结果 
10.11 习 题 


(1) 在 本 章 实例 的 基础 上 ， 添 加 一 个 后 台 管 理 页 面 ， 允 许 对 省 份 参数 信息 进行 设置 ， 
包括 新 增 、 修 改 和 删除 。 

(2) 添加 对 班级 留言 和 相片 评论 的 管理 功能 。 若 当前 用 户 为 班级 管理 员 时 ， 人 允许 该 用 
户 对 该 班级 所 发 表 的 班级 留言 和 相片 的 评论 信息 进行 删除 。 

(3) 在 班级 通讯 录 中 添加 一 个 模块 ， 允 许 用 户 添加 非 本 班级 成 员 的 其 他 同学 的 通讯 录 
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动态 新 闻 发 布 系统 是 大 型 网 站 的 一 个 重要 组 成 部 分 ， 它 可 以 提供 对 网 站 新 闻 的 动态 管 
理 ， 使 之 更 及 时 、 管 理 效率 更 高 。 


11.1 系统 分 析 


11.1.1 系统 功能 

1. 新 闻 浏览 

按照 新 闻 分 类 ， 列 出 该 分 类 下 的 所 有 新 闻 的 简单 信息 ， 包 括 新 闻 标 题 、 新 闻 来 源 、 发 
布 时 间 等 。 这 些 信 息 被 安排 在 新 闻 浏 览 页 面 。 同 时 ， 每 条 新 闻 的 标题 将 会 显示 为 一 个 超级 
链接 ， 单 击 即 可 打开 一 个 新 的 页 面 来 阅读 该 条 新 闻 。 

2. 新 闻 搜 索 

在 新 闻 浏 览 页 面 中 提供 了 新 闻 搜 索 功 能 。 用 户 可 按照 新 闻 分 类 、 关 键 字 或 新 闻 内 容 进 
行 搜索 。 在 搜索 结果 中 ， 将 列 出 符合 条 件 的 新 闻 信 息 ， 其 信息 包括 新 闻 标 题 、 所 属 分 类 、 
新 闻 来 源 、 发 布 时 间 等 。 单 击 新 闻 标 题 ， 可 打开 新 的 页 面 阅读 此 条 新 闻 。 

3. 新 闻 阅 读 


单 击 新 闻 浏览 页 面 中 的 标题 链接 ， 即 可 打开 新 闻 阅 读 页 面 。 在 该 页 面 中 ， 将 显示 指定 
新 闻 的 具体 内 容 及 相关 信息 。 
4. 新 闻 管理 


对 现 有 的 新 闻 进 行 管理 ， 包 括 对 指定 新 闻 的 内 容 进行 编辑 、 修 改 和 删除 等 操作 。 

5. 新 闻 发 布 

添加 新 闻 ， 其 内 容 包 括 新 闻 的 所 属 类 、 新 闻 标 题 、 新 闻 内 容 、 作 者 、 新 闻 来 源 、 发 布 
时 间 、 关 键 字 、 是 否 通过 审核 等 。 

6. 分 类 管理 

对 新 闻 的 分 类 信息 进行 管理 ， 包 括 对 新 闻 分 类 的 编辑 和 删除 操作 。 

7. 添加 分 类 

添加 新 闻 分 类 ， 人 允许 在 指定 的 新 闻 分 类 下 添加 子 分 类 。 


在 以 上 功能 中 ， 新 闻 浏览 、 新 闻 搜 索 、 新 闻 阅 读 属 系统 的 前 台 功 能 ， 任 何 用 户 均 可 查 
看 和 操作 ;而 新 闻 管 理 、 新 闻 发 布 、 分 类 管理 以 及 添加 分 类 等 则 属 系统 的 后 台 功 能 ， 仅 管 
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理 员 可 以 进行 操作 。 
11.1.2 ”数据 库 的 建立 


本 系统 使 用 Microsoft Access 2000 类 型 的 数据 库 ， 其 数据 库 文件 名 为 DataMdb， 在 该 
数据 库 中 仅 添 加 了 ClassInfo( 新 闻 分 类 信息 表 ) 和 ArtInfo( 新 闻 信 息 表 ) 两 个 数据 表 。 


1. 分 类 信息 表 (ClassInfo) 


ClassInfo 数据 表 主 要 用 于 存储 新 闻 的 分 类 信息 ， 其 表 结 构 见 表 11.1。 
表 11.1 Classlnfo 数据 表 


字 段 名 | ”数据 类 型 字段 描述 字段 大 小 
ClassID | 自动 编号 。 | 新 闻 分 类 编号 长 整 型 Pp 
| 上 级 分 类 编号 
新 闻 分 类 名 称 


UpClass | 数字 


ClassName 


2. 新 闻 信息 表 (ArtInfo) 
ArtInfo 数据 表 主 要 用 于 存储 已 发 布 的 新 闻 的 基本 信息 ， 其 表 结 构 见 表 11.2。 
表 11.2 Artlnfo 数据 表 


字段 名 数据 类 型 字段 描述 默认 值 | 主键 
ID 自动 编号 ”| 新 闻 编号 P 
ClassId 数字 所 属 的 新 闻 分 类 编号 
ArtTitle 文本 新 闻 标 题 
ArtContent 备注 新 闻 内 容 
Anuthor 文本 新 闻 作 者 
CopyFrom 文本 新 闻 来 源 
Addtime 日 期 /时 间 | 新 闻 的 发 布 时 间 Now0 
KeyS 文本 用 于 快速 搜索 的 关键 字 
ClickNum 数字 点 击 次 数 
SH 数字 审核 标志 


说 明 : 字段 ClassID 表示 新 闻 所 属 分 类 的 编号 , 该 字段 与 ClassInfo 数据 表 中 的 字段 ID 相关 
联 。 字 段 SH 表示 新 闻 的 审核 标志 ， 其 值 为 0 表示 新 闻 尚 未 审核 ， 其 值 为 1 表示 新 
闻 已 通过 审核 ， 在 前 台新 闻 列 表 中 所 显示 的 均 是 已 通过 审核 的 新 闻 。 


11.1.3 ”站 点 设置 
本 例 中 ， 站 点 设置 的 本 地 信息 如 图 11.1 所 示 。 


“38S， 


"i Dreamweaver+ASP. NET 动态 网 站 设计 与 典型 实例 


图 11.1 本 地 信息 


其 中 ， 站 点 名 称 设置 为 “新 闻 发 布 ”， 本 地 根 文件 夹 设置 为 新 闻 发 布 系统 所 在 的 磁盘 
目录 ， 默 认 图 像 文件 夹 则 设置 为 新 闻 发 布 系统 下 的 Images 目录 ，HTTP 地 址 设置 为 
“http://localhost/art”( 在 此 之 前 ， 需 将 新 闻 发 布 系统 设置 为 Web 共享 ， 并 设置 其 共享 名 为 
art)。 

站 点 设置 中 ， 远 程 信息 设置 如 图 11.2 所 示 。 


发 定义 为 


图 11.2 远程 信息 
由 于 对 新 闻 发 布 系统 的 设计 、 测 试 和 运行 均 是 在 本 机 上 操作 的 ， 因 此 这 里 将 访问 方式 
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设置 为 【本 地 /网 络 】， 而 远 端 文件 夹 则 与 本 地 根 文 件 夹 设置 为 相同 的 目录 。 
站 点 设置 中 ， 测 试 服务 器 设置 如 图 11.3 所 示 。 


图 11.3 测试 服务 器 
对 于 站 点 的 部 署 ， 请 参考 本 书 第 7 章 ， 这 里 不 再 獒 述 。 
11.1.4 创建 数据 库 连 接 
还 需要 创建 一 个 数据 库 连 接 , 这 是 通过 Dreamweaver 8 创建 ASPNET 应 用 程序 的 一 个 
不 可 少 的 操作 。 
新 建 一 个 ASPNET 页 面 ， 打 开 【 应 用 程序 】 面 板 组 ， 切 换 至 【数据 库 】 面 板 ， 单 击 加 


按钮 ， 在 弹出 的 菜单 中 选择 【OLE DB 连接 】 命 令 ， 就 会 弹出 【OLE DB 连接 】 对 话 框 ， 
设置 连接 名 称 为 Can， 如 图 11.4 所 示 。 


11.4 创建 数据 库 连 接 


单 击 【建立 】 按 钮 ， 在 打开 对 话 框 的 Provider 选项 卡 中 选择 Microsoft Jet 4.0 OLE DB 
Provider。 然 后 切换 至 Connection 选项 卡 ， 单 击 国 按钮 ， 选 择 新 闻 发 布 系统 目录 下 的 Data 
子 目录 下 的 Datamdb 文件 作为 系统 的 数据 库 文件 ， 如 图 11.5 所 示 。 
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单 击 【确定 】 按 钮 ， 返 回 【OLE DB 连接 】 对 话 框 ， 再 次 单 击 【确定 】 按 钮 ， 完 成 数 
据 库 的 创建 。 


Bea | 


图 11.5 选择 数据 库 


11.2 构建 模板 
对 于 动态 新 闻 发 布 系统 来 说 , 存在 系统 前 台 与 后 台 之 分 ,两 者 的 页 面 布局 也 有 所 不 同 。 
因此 ， 需 要 为 前 台 页 面 和 后 台 页 面 分 别 构建 符合 要 求 的 模板 。 
11.2.1 前台 模板 


(1) 选择 【文件 】 【新 建 】 命 令 ， 在 弹出 的 【新 建文 档 】 对 话 框 中 ， 选 择 【 模 板 页 】| 
【ASPNET VB 模板 】， 如 图 11.6 所 示 。 


11.6 【新 建文 档 】 对 话 框 
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单 击 【创建 】 按 钮 ， 即 可 新 建 一 个 模板 页 ， 将 文件 保存 为 “前 台 模 板 ”。 
(2) 导入 外 部 样式 表 。 打 开 CSS 面板 ， 在 该 面板 任意 一 处 右 击 ， 从 弹出 的 快捷 菜单 了 
选择 【附加 样式 表 】 命 令 ， 此 时 将 弹出 【链接 外 部 样式 表 】 对 话 框 ， 如 图 11.7 所 示 。 


Ee 


文件 FREEJ [ . /Cssymain css 习 EEJ | CJ 
添加 为 : G 链接 C) En 
个 导入 QD 
取消 
E73 | 
修 也 可 以 输入 逗号 分 隔 的 媒体 类 型 列 表 。 
remwesver 的 范例 样式 表 可 以 媳 助 个 起 步 。 下 助 | 


11.7 【链接 外 部 样式 表 】 对 话 框 


(3) 单 击 【 浏 览 】 按 钮 ， 选 择 系统 目录 中 的 CSS 文件 夹 下 的 Main.css 文件 ， 设 置 添加 
方式 为 【链接 】。 单 击 【 确 定 】 按 钮 ， 完 成 样式 表 的 附加 。 

(4) 切换 至 【设计 】 视 图 ， 单 击 【属性 】 面 板 中 【页 面 属 性 】 按 钮 ， 在 弹出 的 【页 面 
属性 】 对 话 框 中 ， 设 置 页 面 的 背景 颜色 值 为 “#d2d2ca”， 上 边 距 为 0。 

(5) 选择 【插入 】| 【表格 】 命 令 ， 在 页 面 上 插入 一 个 4 行 2 列 的 表格 table1， 其 属性 
设置 如 图 11.8 所 示 。 


图 | 表格 I4 行 K ””” 宽 Fs5 [BR 可 填充 p | 类 @|[ 元 司 @ 
ha 可 FE ”高 lo kr 司 ap 过 Ep 

凤 员 到。 Eh i | 

到 到 到 表 景 轩 丫 介 @ 已 | 


11.8 表格 属性 


(6) 合并 表格 第 1 行 的 两 个 单元 格 ， 并 在 其 中 插入 一 个 图 片 ， 其 源 文件 为 Images 目录 
下 的 Top.gif。 在 第 2 行 的 两 个 单元 格 中 , 分 别 插入 文本 “今天 日 期 : ”和 超级 链接 “管理 ”， 
并 在 第 1 个 单元 格 的 文本 之 后 添加 动态 文本 “<%=now().toString("yyyy 年 MM 月 dd 日 
"%>”， 用 于 显示 当前 日 期 的 年 月 日 。 

(7) 合并 表格 tablel 第 3 行 的 两 个 单元 格 ， 选 择 【 插 入 】 代 模板 对 象 】 人 可 编辑 区 域 】 
命令 。 在 弹出 的 【新 建 可 编辑 区 域 】 对 话 框 ， 设 置 名 称 为 EditRegion1， 如 图 11.9 所 示 。 


11.9 【新 建 可 编辑 区 域 】 对 话 框 


单 击 【确定 】 按 钮 ， 完 成 可 编辑 区 域 的 创建 。 

(8) 在 可 编辑 区 域 中 ， 插 入 一 个 表单 Fom， 在 【代码 】 视 图 中 设置 其 Runat 属性 为 
Server。 同 时 添加 Style 样式 ， 设 置 其 属性 Margin-bottom 和 Margin-top 的 值 均 为 0， 如 图 
11.10 所 示 。 
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“1!I-- TemplatebeginEditable name= EditReglonl 一 -> 
<form runat="server” style="margin-bottom:0; margirrtop:0 > 


/form> 
图 11.10 添加 表单 Form 
(9) 在 表单 Form 中 插入 一 个 1 行 3 列 的 表格 table2, 其 表格 属性 设置 如 图 11.11 所 示 。 


国 | 行 | 更 Fs [未 可 基站 KRX ”可 ” 奖 @) | 元 了 © 
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11.11 表格 属性 
(10) 该 表格 的 第 1 列 用 于 放置 新 闻 的 分 类 信息 和 热门 新 闻 链 接 ， 第 2 列 用 于 实现 左右 
两 个 单元 格 的 分 隔 线 ， 而 第 3 列 则 用 于 放置 页 面 的 主体 内 部 。 


(11) 在 表格 table2 的 第 1 列 中 ， 再 次 插入 一 个 4 行 1 列 的 表格 table3， 其 表格 设置 如 
图 11.12 所 示 。 


图 11.12 表格 设计 


(12) 在 新 闻 分 类 下 的 单元 格 中 插入 了 一 个 ASPNET 2.0 中 的 TreeView 控件 ， 由 于 
Dreamweaver 8 对 其 并 不 支持 可 视 化 操作 ， 因 此 这 里 仅 显 示 了 一 个 湖 标 记 。TreeView 控件 
的 定义 代码 如 图 11.13 所 示 。 


<td height=" 300” align="left” valign="top” style="padding-left:15px;"> | 
| asp: IreeView ID="TreeView!l™ runat="server” Borderstyle="None™ ForeColor= 
“Black” NodeWrap="True” ShowLines="True” ExpandDepth="1" /> | 
</td> 


11.13 ”定义 TreeView 控件 的 定义 代码 


对 于 TreeView 控件 的 数据 绑 定 显示 ， 是 通过 代码 来 执行 的 。 切 换 至 【代码 】 视 图 ， 添 
加 页 面 的 Page_Load 事件 和 自 定义 过 程 LoadClass0， 代 码 如 下 : 
【示例 代码 】 
<Script Runat="Server"> 
"Page_Load 事件 
Sub Page Load(Sender As Object,E As EventArgs) 
If Not IsPostBack Then 
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"调用 自 定义 过 程 Loadclass 
LoadClass () 
End If 
End Sub 
' 自 定义 过 程 Loadclass， 用 于 获取 数据 库 中 的 新 闻 分 类 信息 ， 并 将 其 绑 定 至 TreeView 控件 
Sub LoadClass () 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim DataR Rs OleDbDataReader 
Dim strConn As String 
Dim Sql As String 
Dim i, ParentNode, NodelId Rs Integer 
"获取 数据 库 连接 字符 串 
strConn 
=System.Configuration.ConfigurationSettings.AppSettings ("MM CONNECTION S 
TRING Cnn") 
Cnn = New OleDbCconnection (strConn) 
Cnn.open () 
"查询 新 闻 分 类 信息 
Sql "select * from classinfo order by classid" 
Cmd = New OleDbCommand (sql, Cnn) 
DataR = Cmd.ExecuteReader 
' 定 义 节点 数组 ， 其 下 标 对 应 于 分 类 信息 的 ID 
Dim menuNodes (100) As TreeNode 
For i = 0 To menuNodes.Length - 1 
"初始 化 节点 
menuNodes (i) = New TreeNode 
Next 
"循环 记录 集 ， 依 次 加 载 TreeView 节点 
Do While DataR.Read 


"获取 上 级 分 类 信息 对 应 的 ID 

ParentNode = DataR ("upclass") 

' 获 取 当前 分 类 ID 

NodeId = DataR ("classid") 

"设置 节点 的 显示 文本 

menuNodes (NodeId) .Text = DataR("classname") 
"设置 节点 的 链接 


menuNodes (NodeId) .NavigateUr1 = "default.aspx?ClassID=" & NodeId 
IfE ParentNode <> 0 Then 
' 当 存在 上 级 分 类 时 ， 将 本 节点 作为 上 级 分 类 节点 的 子 节点 进行 添加 
menuNodes (ParentNode) .ChildNodes .Add (menuNodes (NodeId)) 
Else 
' 当 不 存在 上 级 分 类 时 ， 将 本 节点 作为 根 节点 进行 添加 
TreeViewl .Nodes.Add (menuNodes (NodeId) ) 
End If 
Loop 
cnn.Close() ' 关 闭 数据 库 连 接 
End Sub 
</Script> 


对 于 热门 新 闻 的 数据 显示 ， 由 于 涉及 数据 集 的 创建 ， 因 此 将 在 具体 的 功能 页 面 中 进行 
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数据 的 绑 定 。 
至 此 ， 前 台 模 板 创建 完成 ， 其 页 面 预览 如 图 11.14 所 示 。 
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11.14 “前台 模板 页 面 预览 


这 里 ， 值 得 一 提 的 是 ， 虽 然 把 相应 的 事件 代码 添加 在 页 面 模板 中 (如 Page_Load 事件 )， 
但 当 将 模板 应 用 到 具体 的 页 面 时 ， 这 些 代 码 仍 处 于 可 编辑 状态 ， 用 户 仍 可 进行 编辑 ， 从 而 
不 会 影响 到 具体 页 面 的 功能 实现 。 


11.2.2 后 台 模 板 


后 台 模 板 的 页 面 结构 与 前 台 模 板 的 页 面 结构 较为 类 似 ， 其 主要 区 别 在 于 后 台 模 板 下 方 
显示 的 并 不 是 新 闻 分 类 和 热门 新 闻 ， 而 是 后 台 的 功能 模块 链接 。 考 虑 两 者 的 结构 类 似 ， 因 
此 无 须 重新 创建 模板 ， 直 接 将 前 台 模 板 另 存 ， 并 在 其 基础 上 直接 进行 修改 即 可 。 

打开 前 台 模 板 页 面 ， 选 择 【 文 件 】|【 另 存 为 】 命 令 ， 
在 弹出 的 【另存 为 】 对 话 框 中 ， 将 其 另存 为 “后 台 模 
板 .dwt.aspx” 

首先 ， 打 开 【 代 码 】 视 图 ， 将 页 面 的 Page_Load 事件 
及 自 定义 过 程 LoadClass 的 代码 删除 ; 然后 , 切换 至 【设计 】 
视图 ， 将 文本 “管理 ”修改 为 “返回 前 台 ”， 并 更 改 其 链 
接 为 “../default.aspx” 

加 二 ble ee 其 调整 后 的 布局 如 图 11.15 所 示 。 
Ait ; admin, aspX， 和 的 链接 设置 为 Art_add.aspx， 11.15 表格 设计 

“分 类 管理 ”的 链接 设置 为 Class_admin aspx, “添加 分 类 ” 
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的 链接 设置 为 Class_ add.aspx， 其 目标 属性 均 设 置 为 self。 
至 此 ， 后 台 模 板 创建 完成 ， 其 页 面 预览 如 图 11.16 所 示 。 
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图 11.16 页 面 预览 


11.3 新 闻 浏 览 


在 新 闻 浏 览 页 面 中 ， 包 括 新 闻 列 表 和 新 闻 搜 索 两 个 模块 。 前 者 ， 将 显示 指定 分 类 下 的 
所 有 新 闻 信 息 ， 后 者 ， 则 提供 给 浏览 者 用 来 输入 或 选择 新 闻 分 类 、 新 闻 标题 、 关 键 字 、 新 
闻 等 内 容 的 文本 框 或 下 拉 列 表 框 ， 以 便 通过 多 个 条 件 搜索 指定 的 新 闻 。 
11.3.1 新闻 列 表 


(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ,将 其 命名 为 Default.aspx。 选 择 【 修 改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【前 台 模 板 】， 将 模板 
应 用 到 本 页 面 。 

先 看 一 下 热门 新 闻 的 数据 绑 定 。 

(2) 在 【服务 器 行为 】 面 板 中 单 击 园 按 钮 ， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 ， 在 
弹出 的 【数据 集 】 对 话 框 中 , 设置 数据 集 名 称 为 DataSetl, 连接 选择 Cnn, 表格 选择 ArtInfo， 
在 【 列 】 下 拉 列 表 框 中 选择 字段 ID 和 ArtTitle， 并 设置 排序 方式 为 按 字段 ClickNum 降序 
排序 ， 如 图 11.17 所 示 。 

单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 。 

(3) 在 文字 “热门 新 闻 ” 下 面 的 单元 格 中 ， 插 入 一 个 <div> 标 签 ， 并 添加 Style 样式 ， 
设置 其 Padding-bottom 属性 的 值 为 5px; 在 <div> 标 签 中 插入 一 个 图 片 ， 其 源 文 件 为 Inages 
目录 下 的 Arrow-.gif。 

(4) 打开 【 绑 定 】 面 板 , 选择 并 展开 数据 集 DataSetl ， 拖 动 字段 ArtTitle 至 前 面 所 插入 
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的 图 片 之 后 ， 并 在 【属性 】 面 板 中 设置 其 链接 属性 为 “ art_ show.aspx? id=<9%6# 
DataSetl.FieldValue("id", Container) %>”。 此 时 ， 单 条 数据 的 绑 定 已 完成 。 


图 11.17 创建 数据 集 DataSet1 
(5) 选择 整个 <div> 标 签 ， 在 【服务 器 行为 】 面 板 中 单 击 剧 按钮， 从 弹出 的 菜单 中 选择 
【重复 区 域 】 命 令 。 在 弹出 的 【重复 区 域 】 对 话 框 中 ， 选 择 数据 集 DataSet1， 设 置 一 次 显 
示 4 条 记录 ， 如 图 11.18 所 示 。 
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图 11.18 创建 重复 区 域 


(6) 单 击 【确定 】 按 钮 ， 完 成 重复 区 域 的 创建 。 在 热门 新 闻 中 ， 仅 显示 4 条 点 击 率 最 
高 的 新 闻 。 为 此 ， 可 以 在 数据 集中 设置 仅 返 回 4 条 记录 (使 用 Top 关键 字 )， 或 在 重复 区 域 
中 设置 一 次 显示 的 记录 数 。 这 里 ， 采 用 第 二 种 方法 。 至 此 ， 热 门 新 闻 的 数据 绑 定 完 成 。 

接 下 来 ， 看 看 新 闻 列 表 功 能 的 实现 。 

由 于 在 新 闻 浏 览 页 面 中 ,包括 了 新 闻 列表 和 新 闻 搜 索 两 个 模块 。 因 此 ， 必 须 通过 Panel 
控件 来 控制 不 同情 况 下 的 界面 显示 。 

(7) 将 光标 置 于 表格 table2 的 第 3 列 的 单元 格 中 ,在 【ASPNET- 插 入 】 工 具 栏 中 单 击 
【更 多 标签 】 按 钮 国 ， 在 弹出 的 【标签 选择 器 】 对 话 框 中 ， 选 择 【ASPNET 标签 】| 【Web 
服务 器 控件 】 分 类 ， 并 在 右 侧 服务 器 控件 列表 中 选择 asp:Panel， 如 图 11.19 所 示 。 

(8) 单 击 【插入 】 按 钮 ， 在 弹出 的 【标签 编辑 器 】 对 话 框 中 设置 其 ID 为 Panell。 单 击 
【关闭 】 按 钮 ， 完 成 Panel 控件 的 添加 。 

在 新 闻 列 表 页 面 中 ， 需 要 考虑 两 种 情况 : 一 种 是 用 户 直接 进入 本 页 面 ， 而 没有 选择 新 
闻 分 类 ， 此 时 需要 显示 所 有 类 别 的 新 闻 信 息 ; 另 一 种 情况 是 当 用 户 选择 了 某 一 新 闻 分 类 ， 
仅 显示 该 分 类 下 的 所 有 新 闻 。 那 么 ， 如 何 判断 用 户 是 否 选择 了 新 闻 分 类 呢 ? 事实 上 ， 根 据 
页 面 参数 ClassID 的 值 是 否 为 空 可 以 判断 ， 此 操作 将 在 页 面 的 Page Load 事件 中 执行 。 但 
必须 添加 相应 的 Panel 控件 ， 以 针对 不 同 的 情况 显示 不 同 的 信息 。 
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11.19 【标签 选择 器 】 对 话 框 
为 此 , 在 控件 Panell 中 , 再 次 添加 两 个 Panel 控件 , 其 ID 分 别 设置 为 Panel2 和 Panel3。 
在 显示 新 闻 列表 之 前 , 需要 创建 两 个 数据 集 , 分 别针 对 以 上 两 种 不 同情 况 的 数据 绑 定 。 
(9) 在 【服务 器 行为 】 面 板 中 ， 单 击 型 按 钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
单 击 【 高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 在 【数据 集 】 对 话 框 的 高 级 模 
式 中 , 单 击 【编辑 参数 ] 按 钮 国 , 在 弹出 的 [编辑 参数 ] 对 话 框 中 设置 参数 名 称 为 <@ClassId”， 


如 图 11.20 所 示 。 
CC Ce | 
ul 可 | 

人 | i 更 助 
可 


图 11.20 【编辑 参数 】 对 话 框 
fF【 建 立 】 按 钮 ， 在 弹出 的 【生成 值 】 对 话 框 中 ， 设 置 参 数 的 值 为 URL 参数 


(10) 单 如 
ClassId， 如 图 11.21 所 示 。 


图 11.21 【生成 值 ] 对 话 框 
回 【 数 


(11) 单 击 【 确 定 】 按 钮 ， 返 回 【添加 参数 】 对 话 框 ; 再 次 单 击 【确定 】 按 钮 ， 返 
据 集 】 对 话 框 。 设 置 数据 集 的 名 称 为 DataSet2， 连 接 选择 Can， 并 在 SQL 文本 框 中 输入 以 


下 SQL 语句 : 


se 
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SELECT id,Addtime, ArtTitle, Author, CopyFrom,classname FROM 
RArtInfo,ClassInfo WHERE ArtIinfo.classid=ClassInfo.Classid and sh=1 and 
RrtInfo.ClassId = ? ORDER BY addtime desc 


数据 集 设置 界面 如 图 11.22 所 示 。 
单 击 【 确 定 】 按 钮 , 完成 数据 集 的 创建 , 该 数据 集 用 于 获取 指定 分 类 下 的 所 有 新 闻 信息 。 


图 11.22 创建 数据 集 DataSet2 


(12) 再 次 单 击 【 服 务 器 行为 】 面板 中 的 加 按钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命令 。 
单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 在 【数据 集 】 对 话 框 的 高 级 模 
式 中 ， 设 置 数据 集 的 名 称 为 DataSet3， 连 接 选 择 Cnn， 并 在 SQL 文本 框 中 输入 以 下 SQL 
语句 : 

SELECT artinfo.id,arttitle,classname,author, copyfrom, addtime FROM 

artinfo,classinfo WHERE artinfo.classid=classinfo.classid and sh=1 ORDER BY 

addtime desc 

如 图 11.23 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSet3 的 创建 ， 该 数据 集 用 于 获取 未 指定 分 类 情况 
下 的 所 有 新 闻 信 息 。 

(13) 在 控件 Panel2 中 ， 输 入 文本 “当前 分 类 : ”。 在 【应 用 程序 】 面 板 组 中 ， 切 换 至 

【 绑 定 】 面 板 , 选择 并 展开 数据 集 DataSet2， 拖 动 字段 ClassName 至 该 文本 之 后 , 并 在 【 属 

性 】 面 板 中 设置 其 字体 颜色 为 红色 ， 加 粗 显 示 。 

(14) 按 Enter 键 换行 。 在 【服务 器 行为 】 面 板 中 ， 单 击 国 按 钮 ， 从 弹出 的 菜单 中 选择 

【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 中 ， 设 置 ID 为 “DataGridl ”， 数 据 集 

选择 DataSet2， 并 设置 为 一 次 显示 10 条 记录 , 【导航 】 选 项 设置 为 【编号 链接 到 每 一 页 】， 
如 图 11.24 所 示 。 
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图 11.24 创建 数据 网 格 DataGrid1 
(15) 分 别 选择 不 需要 在 数据 网 格 中 显示 的 列 ID 和 ClassName, 单 击 【删除 列 】 按 钮 局 ， 


将 其 从 【 列 】 列 表 框 中 删除 。 选 择 Author 列 ， 单 击 【编辑 】 按 钮 ， 在 弹出 的 【简单 数据 字 
段 列 】 对 话 框 中 ， 设 置 其 标题 为 “作者 ”， 如 图 11.25 所 示 。 


图 11.25 【简单 数据 字段 列 】 对 话 框 


(16) 重复 此 操作 ， 分 别 设置 列 Addtime 和 CopyFrom 的 显示 标题 为 “发 布 时 间 ” 和 “新 
闻 来 源 ”。 选 择 列 ArtTitle， 单 击 【更 改 列 类 型 】 按 钮 ， 从 弹出 的 菜单 中 选择 【超级 链接 】 
命令 ， 此 时 将 弹出 【超级 链接 列 】 对 话 框 ， 如 图 11.26 所 示 。 
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11.26 【超级 链接 列 】 对 话 框 


(17) 设置 【标题 】 为 “新 闻 标题 ”, 【超级 链接 文本 】 为 数据 字段 ArtTitle, 【链接 页 】 
为 数据 字段 ID，【 格 式 字 符 串 】 设 置 为 “Art_ Show?id={0}”。 单 击 【 确 定 】 按 钮 ， 完 成 
超级 链接 列 的 设置 。 

(18) 通过 单 击 窜 | 和 四 按钮 ， 调 整 字段 列 的 顺序 从 上 到 下 为 “新 闻 标题 ”、“ 作 者 ”、 
“新 闻 来 源 ” 和 “发 布 时 间 ”， 如 图 11.27 所 示 。 


LH rrr —w_ | 
Wi 和 es | 四 | 
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简单 数据 字段 
简单 数据 字段 
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图 11.27 【数据 网 格 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 DataGridl 的 创建 。 

(19) 为 了 控制 数据 集 为 空 时 的 显示 ， 在 数据 网 格 DataGridl 之 后 ， 输 入 文本 “该 分 类 
下 暂 无 相关 新 闻 ! ”， 并 设置 其 字体 颜色 为 红色 。 选 择 该 段 文本 ， 在 【服务 器 行为 】 面 板 
中 单 击 怖 按钮 ， 在 弹出 的 菜单 中 选择 【显示 区 域 】| 【数据 集 为 空 时 显示 】 命 令 ， 并 在 弹出 
的 对 话 框 中 设置 数据 集 为 DataSet2， 如 图 11.28 所 示 。 


数 掺 集 为 空 时 星 示 
数据 集 。[ TYC7T7 


x 


屋 本 | 
En 


图 11.28 【数据 集 为 空 时 显示 】 对 话 框 
单 击 【确定 】 按 钮 ， 完 成 显示 区 域 的 设置 。 
(20) 选择 数据 网 格 DataGrid1， 在 【服务 器 行为 】 面 板 中 单 击 加 按钮 ， 在 弹出 的 菜单 中 
选择 【显示 区 域 】| 【数据 集 不 为 空 时 显示 】 命 令 ， 并 在 弹出 的 对 话 框 中 同样 设置 数据 集 为 
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DataSet2。 

(21) 将 光标 置 于 控件 Panel3 中 ， 打 开 【 服 务 器 行为 】 面 板 ， 单 击 国 按 钮 ， 在 弹出 的 菜 
单 中 选择 【数据 网 格 】 命 令 ， 在 弹出 的 【数据 网 格 】 对 话 框 中 设置 ID 为 DataGrid2， 数 据 
集 选 择 DataSet3， 设 置 为 一 次 显示 10 条 记录 ， 在 【导航 】 下 拉 列 表 框 中 选择 【编号 链接 到 
每 一 页 】， 如 图 11.29 所 示 。 


mhierie 
数据 入 :nstsset3 | 


di 


图 11.29 创建 数据 网 格 DataGrid2 


(22) 选择 列 ID， 单 击 【 删 除 列 】 按 钮 号 ,将 其 从 【 列 】 列 表 框 中 删除 。 选择 ClassName 
列 ， 单 击 【 编 辑 】 按 钮 ， 在 弹出 的 【简单 数据 字段 列 】 对 话 框 中 ， 设 置 其 标题 为 “所 属 分 
类 ”。 重复 此 操作 ， 分 别 设置 列 Author、Addtime 和 CopyFrom 的 显示 标题 为 “作者 ”、 
“发 布 时 间 ” 和 “新 闻 来 源 ”。 选 择 列 ArtTitle， 单 击 【 更 改 列 类 型 】 按 钮 ， 从 弹出 的 菜单 
中 选择 【超级 链接 】 命 令 。 在 弹出 的 【超级 链接 列 】 对 话 框 中 设置 【标题 】 为 “新 闻 标 题 ”， 
【超级 链接 文本 】 为 数据 字段 ArtTitle，【 链 接 页 】 为 数据 字段 it，【 格 式 字 符 串 】 设 置 为 
“Art_ Show?id={0}”， 如 图 11.30 所 示 。 


起 弧 链接 列 E4 


11.30 【超级 链接 列 】 对 话 框 


(23) 单 击 【确定 】 按 钮 ， 完 成 超级 链接 列 的 设置 。 最 后 ， 通 过 单 击 轩 和 受 按 钮 ， 调 整 
字段 列 的 顺序 从 上 到 下 为 “新 闻 标题 ”、“ 所 属 分 类 ”、“ 作 者 ”、“ 新 闻 来 源 ” 和 “发 
布 时 间 ”， 如 图 11.31 所 示 。 

单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 DataGrid2 的 创建 。 
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图 11.31 数据 网 格 DataGrid2 
(24) 切换 至 【代码 】 视 图 ， 对 页 面 的 Page_Load 事件 进行 修改 ， 其 代码 如 下 : 
【示例 代码 】 


Sub Page Load(Sender Rs Object,E Rs EventArgs) 
If Not IsPostBack Then 
LoadClass () 
' 判 断 页 面 参数 classID 是 否 为 空 ， 以 此 判断 用 户 是 否 选择 了 新 闻 分 类 
if request.Querystring ("ClassID")="" Then 
' 页面 参 数 classID 为 空 ， 显 示 所 有 新 闻 信息 
Panel2.visible=false 
Panel3.visible=true 
else 
' 页 面 参 数 classID 不 为 空 ， 显 示 指 定 分 类 下 的 所 有 新 闻 信 息 
Panel2.visible=true 
Panel3.visible=false 
end if 
End If 
End Sub 


至 此 ， 新 闻 浏览 页 面 中 新 闻 列 表 的 功能 已 经 全 部 完 
当 用 户 初次 打开 新 闻 发 布 系统 的 主页 面 时 ， 将 显示 所 有 分 类 的 新 闻 信息 ， 其 页 面 预览 
效果 如 图 11.32 所 示 。 
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11.32 页面 预览 效果 
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当 用 户 选择 某 一 新 闻 分 类 时 ， 可 查看 此 分 类 下 的 所 有 新 闻 ， 其 页 面 预览 效果 如 图 11.33 
所 示 。 
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图 11.33 ”页面 预览 效果 
11.3.2 ”新 闻 搜索 
下 面 ， 再 来 看 新 闻 浏 览 页 面 中 新 闻 搜索 功能 的 实现 。 
(1) 在 控件 Panell 之 后 , 插入 一 个 2 行 1 列 的 表格 table4， 其 表格 属性 设置 如 图 11.34 
所 示 。 
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11.34 ”表格 属性 


(2) 在 表格 的 各 个 单元 格 中 输入 相应 的 文本 及 设置 搜索 条 件 用 的 文本 框 或 下 拉 列 表 框 
控件 ， 如 图 11.35 所 示 。 


全 文 搜索 
分 类 labc 站 TEXTBOX] 关键 字 : 


图 11.35 表格 设计 
(3) 设置 三 个 文本 框 控件 的 Width 属性 均 为 60px， 以 保证 搜索 条 件 能 在 一 行 显示 。 对 


件 能 最 二 
于 “分 类 ”处 的 下 拉 列 表 框 ， 其 数据 的 绑 定 均 将 通过 自 定 义 过 程 LoadClass10 来 执行 ， 其 代 
码 如 下 : 


【示例 代码 】 
Sub LoadClassl (ByVal ClassId As Integer, ByVal TheTag As Integer) 


"过 程 参 数 classID 表示 父 分 类 的 ID， 过 程 参数 TheTag 表示 当前 分 类 的 级 别 


Dim Cnn As OleDbConnection 
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Dim Cmd As OleDbCommand 
Dim DataR As OleDbDataReader 
Dim Sql As String 
Dim Strl As String 
Dim i as Integer 
Dim StrCnn Rs String 
"获取 数据 库 连接 字符 串 
StrCnn = 
System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION ST 
RING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
cnn .Open () “连接 数据 库 
"查询 当前 父 分 类 下 的 所 有 分 类 信息 
Sql = "select * from classinfo where upclass=" & trim(ClassID) & " order 
by classid" 
Cmd = New OleDbCommand (Sql, Cnn) 
DataR = Cmd.ExecuteReader 
For i = 1 To TheTag 
"根据 当前 分 类 的 级 别 ， 获 取 分 类 名 称 的 前 绥 
Strl = Strl & "上 H" 
Next 
While DataR.Read 
' 定 义 DropDownList 控件 的 数据 项 
Dim theItem As New ListItem() 


' 设 置 数 据 项 的 显示 文本 
theItem.Text = trim(Strl) & trim(DataR ("classname")) 
theItem.Value = DataR("classid") “，' 设 置 数 据 项 的 返回 值 


"将 当前 定义 的 数据 项 添加 至 DropDownList 控件 中 
ssfl.Items.Add (theItem) 
' 嵌 套 调用 过 程 Loadclass1， 加 载 当前 分 类 下 的 子 分 类 
LoadClassl (DataR ("classid"), TheTag+1) 
End While 
cnn.Cclose () ' 关 闭 数据 库 连 接 
End Sub 


为 了 获取 搜索 结果 ， 需 要 再 次 创建 一 个 数据 集 。 

(4) 打开 【应 用 程序 】 面 板 组 ， 切 换 至 【服务 器 行为 】 面 板 ， 单 击 到 按钮 ， 在 弹出 的 
菜单 中 选择 【数据 集 】 命 令 。 单 击 【高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 
在 【数据 集 】 对 话 框 的 高 级 模式 中 ， 设 置 数据 集 的 名 称 为 DataSet4， 连 接 选择 Cnn。 

(5) 通过 单 击 【 添 加 参数 】 按 钮 团 ， 依 次 添加 4 个 参数 :，@ClassID、@Title、@Key 
和 @Content， 其 取 值 分 别 设置 为 表单 变量 SSFL、Title、Key 和 Content 的 值 ， 即 分 别 获 取 
于 4 个 搜索 条 件 的 输入 值 。 

(6) 在 SQL 文本 框 中 输入 以 下 SQL 语句 : 

SELECT artinfo.id,arttitle,classname,author, copyfrom, addtime FROM 

artinfo,classinfo WHERE artinfo.classid=classinfo.classid and sh=1 and 


artinfo.classid=? and arttitle like '%'+?2+'$%' and keys like '%'+?2+'%' and 
artcontent like '%$'+?2+'%' ORDER BY addtime desc 


如 图 11.36 所 示 。 
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图 11.36 创建 数据 集 DataSet4 


单 击 【确定 】 按 钮 ， 完 成 数据 集 的 创建 ， 该 数据 集 将 返回 所 有 符合 搜索 条 件 的 新 闻 
信息 。 

(7) 在 表格 table4 之 后 ， 插 入 一 个 Panel 控件 ， 设 置 其 ID 为 Panel4， 该 控件 用 于 控制 

(8) 将 光标 置 于 Panel4 中 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 型 按钮 ， 从 弹出 的 菜单 中 
选择 【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 中 ， 设 置 ID 为 DataGrid3， 数 据 集 
选择 DataSet4， 并 设置 一 次 显示 10 条 记录 ， 在 【导航 】 下 拉 列 表 框 中 选择 【编号 链接 到 每 
一 页 】， 如 图 11.37 所 示 。 


mr 


图 11.37 创建 数据 网 格 DataGrid3 


(9) 选择 列 DD， 单 击 【 删 除 列 】 按 钮 号 ， 将 其 从 【 列 】 列 表 框 中 删除 。 分 别 设置 列 
ClassName、Author、Addtime 和 CopyFrom 的 显示 标题 为 “所 属 分 类 ”、“ 作 者 ”、“ 发 
布 时 间 ” 和 “新 闻 来 源 ”。 选 择 列 ArtTitle， 单 击 【 更 改 列 类 型 】 按 钮 ， 从 弹出 的 菜单 中 选 
择 【 超 级 链接 】 命 令 。 在 弹出 的 【超级 链接 列 】 对 话 框 中 ， 设 置 【标题 】 为 “新 闻 标 题 ”， 
【超级 链接 文本 】 为 数据 字段 arttitle，【 链 接 页 】 为 数据 字段 id，【 格 式 字符 串 】 设 置 为 
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“Art_ Show.aspx?id={0}”， 如 图 11.38 所 示 。 
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11.38 【超级 链接 列 】 对 话 框 


(10) 单 击 【确定 】 按 钮 ， 完 成 超级 链接 列 的 设置 。 最 后 ， 通 过 单 击 到 和 区 按钮 ， 调 整 
字段 列 的 顺序 从 上 到 下 为 新 闻 标 题 、 所 属 分 类 、 作 者 、 新 闻 来 源 和 发 布 时 间 ， 如 图 11.39 


所 示 。 
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图 11.39 数据 网 格 DataGrid4 


单 击 【确定 】 按 钮 ， 完 成 数据 网 格 DataGrid3 的 创建 。 


(11) 在 【设计 】 视 图 中 ， 选 择 数据 网 格 DataGrid4， 在 【服务 器 行为 】 面 板 中 单 击 国 按 
钮 ， 在 弹出 的 菜单 中 选择 【显示 区 域 】|【 数 据 不 为 空 时 显示 】 命 令 。 在 弹出 的 【数据 集 不 
为 空 显 示 】 对 话 框 中 ， 选 择 数据 集 DataSet4， 如 图 11.40 所 示 。 


煞 笑 集 不 为 空 显示 


11.40 【数据 集 不 为 空 显示 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 显示 区 域 的 设置 。 


(12) 在 以 上 显示 区 域 之 后 ， 输 入 文本 “没有 您 想 要 的 新 闻 ， 请 重新 搜索 ! ”， 并 设置 


其 字体 颜色 为 红色 。 选 择 该 文本 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 别 按钮， 从 弹 H 


4 的 菜单 


中 选择 【显示 区 域 】| 【数据 为 空 时 显示 】 命 令 ， 并 在 弹出 的 【数据 为 空 时 显示 】 对 话 框 中 


选择 数据 集 DataSet4。 


(13) 此 时 ， 新 闻 搜索 的 页 面 设计 基本 完成 。 最后， 再 来 看 Page Load 事件 的 调整 ， 其 
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事件 代码 如 下 : 
【示例 代码 】 


Sub Page Load (Sender Rs Object,E As EventRArgs) 
If Not IsPostBack Then 
"加 载 页 面 左 侧 的 新 闻 分 类 树 形 列表 杠 
LoadClass() 
"加 载 搜索 条 件 中 的 新 闻 分 类 下 拉 列 表 框 
LoadClass1 (0,0) 
" 当 页 面 初 次 加 载 时 ， 显 示 新 闻 列 表 ， 隐 藏 搜索 结果 区 域 
Panell.visible=true 
panel4.visible=false 
if request.QueryString("ClassID") 
Panel2.visible=false 
Panel3.visible=true 
else 
Panel2.visible=true 
Panel3.visible=false 
end if 
else 
' 当 页 面 由 数据 回 发 导致 提交 时 ， 显 示 搜 索 结果 区 域 ， 隐 藏 新 闻 列 表 
panell.visible=false 
panel4.visible=true 
End If 
End Sub 


至 此 ， 新 闻 浏览 页 面 的 功能 全 部 设计 完成 。 
当 用 户 查 看 指定 分 类 或 所 有 分 类 的 新 闻 列 表 时 ， 页 面 预览 效果 如 图 11.41 所 示 。 
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图 11.41 页 面 预览 效果 


当 输 入 搜索 条 件 并 单 击 【搜索 】 按 钮 后 ， 页 面 将 显示 搜索 结果 并 隐藏 新 闻 列 表 ， 如 
图 11.42 所 示 。 
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图 11.42 ”搜索 结果 


11.4 新 闻 阅 读 


新 闻 阅 读 是 指 查 看 指定 的 新 闻 信息 。 在 新 闻 阅 读 页 面 中 ， 除 了 显示 当前 的 新 闻 信息 ， 
还 需 添加 【上 一 条 】 链 接 和 【下 一 条 】 链 接 ， 实 现 浏览 同一 新 闻 分 类 下 的 上 一 条 新 闻 和 下 
一 条 新 闻 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Art_Show.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【前 台 模 板 】， 将 
模板 应 用 到 本 页 面 。 

实现 热门 新 闻 的 数据 绑 定 。 为 此 ， 需 要 创建 数据 集 DataSetl 和 一 个 重复 区 域 ， 此 操作 
与 新 闻 列 表 中 的 相关 操作 完全 相同 ， 这 里 不 再 袭 述 。 

对 于 单条 新 闻 的 阅读 ， 其 指定 的 新 闻 ID 可 由 页 面 变量 ID 来 获取 。 在 绑 定 新 闻 相 关 的 
动态 数据 之 前 ， 先 来 创建 一 个 数据 集 。 

(2) 在 【服务 器 行为 】 面 板 中 ， 单 击 到 按钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
设置 数据 集 名 称 为 DataSet2， 选 择 连接 Cnn， 表 格 设置 为 ArtInfo， 筛 选 条 件 为 字段 Id 等 于 
URL 参数 I4， 如 图 11.43 所 示 。 


11.43 ”创建 数据 集 DataSet2 
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单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet2 的 创建 ， 该 数据 集 将 返回 指定 ID 的 新 闻 信 息 。 
(3) 在 表格 table2 的 第 3 个 单元 格 中 , 插入 一 个 6 行 1 列 的 表格 talbe4, 其 属性 设置 如 
图 11.44 所 示 。 
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11.44 ”表格 属性 设置 


(4) 分 别 设置 表格 第 2 行 和 第 5 行 的 单元 格 高 度 为 1， 并 设置 其 背景 颜色 值 为 
“#000066”， 这 两 行将 显示 为 一 条 细 的 分 隔 线 。 同 时 ， 设 置 表格 第 1 行 和 第 3 行 的 单元 格 
水 平 对 齐 方 式 为 居中 对 齐 。 

(5) 在 【 绑 定 】 面 板 中 选择 并 展开 数据 集 DataSet2， 选 择 并 拖 动 字段 ArtTitle 至 表格 
table4 的 第 1 个 单元 格 中 , 并 在 [属性 了】 面板 中 设置 其 大 小 为 16px, 字体 颜色 值 为 “#000066”， 
加 粗 显 示 。 然 后 ， 拖 动 字 段 AddTime 和 CopyFrom 至 表格 table4 的 第 3 行 的 单元 格 中 ， 拖 
动 字段 ArtContent 至 表格 table4 的 第 4 行 的 单元 格 中 。 最 后 ， 在 表格 第 6 行 的 单元 格 中 输 
入 文本 “上 一 条 : ”和 文本 “下 一 条 : ”， 如 图 11.45 所 示 。 


{DataSet2. ArtTitle} 


中 
图 11.45 表格 设计 


(6) 在 添加 新 闻 信息 时 ， 可 通过 按 Enter 键 换行 或 空格 等 来 控制 新 闻 的 显示 样式 。 但 
在 显示 为 HTML 页 面 时 ,这些 特殊 符号 常常 会 被 忽略 ， 导 致 新 闻 显 示 的 样式 与 设计 时 的 样 
式 完全 不 同 。 为 此 ， 需 要 自 定义 一 个 函数 来 格式 化 所 要 输出 的 新 闻 内 容 ， 将 其 中 的 某 些 特 
殊 符号 转换 为 相应 的 HTML 标记 。 自 定义 的 函数 名 为 ConvertHTML， 其 代码 如 下 : 
【示例 代码 】 
Function ConvertHTML (BYVal Strl) 
Strl Replace (Strl, ">", ">") 


Str1 Replace (strl, "<", "<") 
StErl Replace (strl, Chr(32), "gnbsp;") 


el 


Strl = Replace (strl, Chr(9), " ") 
strl Replace (Strl, Chr(34), "'") 
在下 主 Replace (strl, Chr(39), "'") 
St Replace (strl, Chr(13), "") 
Strl = Replace(strl, Chr(10) & Chr(10), 


"</P><P>&gnbsp; &nbsp; gnbsp; &nbsp; gnbsp; Enbsp; &nbsp; Enbsp; ") 
Strl = Replace (strl, Chr(10), "<BR>&nbsp; &nbsp;é&nbsp; gnbsp;") 
ConvertHTML = Strl 

End Function 


(7) 在 【服务 器 行为 】 面 板 中 双击 动态 文本 DataSet2.ArtContent， 在 弹出 的 【动态 文 
本 】 对 话 框 中 ， 将 其 代码 修改 为 “<%# ConvertHTML (DataSet2.FieldValue("ArtContent", 


。407 。 
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Container)) %>”， 如 图 11.46 所 示 。 
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图 11.46 【动态 文本 】 对 话 框 


指定 新 闻 信 息 的 绑 定 已 经 完成 ， 下 面 来 看 【上 一 条 】 动 态 链接 与 【下 一 条 】 动 态 链接 
的 数据 绑 定 。 

(8) 在 【服务 器 行为 】 面 板 中 单 击 国 按钮 ， 在 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 单 
击 【 高 级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 。 在 【数据 集 】 对 话 框 的 高 级 模式 
中 ,设置 数据 集 的 名 称 为 DataSet3， 连 接 选 择 Cnn。 

(9) 单 击 [添加 参数 ] 按 钮 图), 在 弹出 的 【添加 参数 ] 对 话 框 中 设置 参数 名 称 为 <@Id”， 
并 设置 其 值 为 URL 参数 Id。 重复 以 上 操作 , 再 次 添加 一 个 参数 “@id1”， 其 值 同样 为 URL 
参数 Id。 

然后 ， 在 SQL 文本 框 中 输入 以 下 SQL 语句 : 

SELECT top 1 * FROM ArtInfo WHERE classid=(select classid from artinfo where 


id=?) and addtime> (select addtime from artinfo where id=?) ORDER BY addtime 
desc 


如 图 11.47 所 示 。 


图 11.47 创建 数据 集 DataSet3 
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单 击 【确定 】 按 钮 ， 完 成 数据 集 DataSet3 的 创建 ， 该 数据 集 将 返回 上 一 条 新 闻 的 相关 
信息 。 
(10) 在 【服务 器 行为 】 面 板 中, 复制 数据 集 DataSet3 并 粘贴 生成 新 的 数据 集 DataSet4。 
双击 数据 集 DataSet4， 将 其 SQL 语句 修改 为 : 

SELECT top 1 * FROM ArtInfo WHERE classid=(select classid from artinfo where 

id=?) and addtime< (select addtime from artinfo where id=?) ORDER BY addtime 

desc 

该 数据 集 将 返回 下 一 条 新 闻 的 相关 信息 。 

(11) 在 【 绑 定 】 面 板 中 选择 并 展开 数据 集 DataSet3, 拖 动 字段 ArtTitle 至 文本 上 一 条 : ” 
之 后 , 并 在 【属性 】 面板 中 设置 其 链接 为 “Art_Show.aspx?id=<%# DataSet3 FieldValue("id"， 
Container) %>”。 在 该 动态 文本 之 后 ， 输 入 文本 “没有 了 ”， 并 设置 其 字体 颜色 为 红色 。 
选择 该 文本 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 吕 按钮 ， 在 弹出 菜单 中 选择 【显示 区 域 】| 

【数据 集 为 空 时 显示 】 命 令 ， 并 在 弹出 的 对 话 框 中 选择 数据 集 DataSet3， 如 图 11.48 所 示 。 


图 11.48 【数据 集 为 空 时 显示 】 对 话 框 


(12) 重复 以 上 操作 , 选择 并 展开 数据 集 DataSet4, 拖 动 字段 ArtTitle 至 文本 “下 一 条 : ” 
之 后 , 并 在 【属性 】 面 板 中 设置 其 链接 为 “Art_Show.aspx?id=<%# DataSet4.FieldValue("id", 
Container) %>”。 在 该 动态 文本 之 后 输入 文本 “没有 了 ”， 并 选择 该 文本 ， 按 步骤 (11) 打 开 

【数据 集 为 空 时 显示 】 对 话 框 ， 并 在 弹出 的 对 话 框 中 选择 数据 集 DataSet4。 

(13) 最 后 ， 还 需 修 改 页 面 的 Page_Load 事件 ， 以 便 更 新 指定 新 闻 的 点 击 数 ， 其 代码 
如 下 : 

【示例 代码 】 


Sub Page Load(Sender As Object,E As EventArgs) 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim strConn As String 
Dim Sql As String 
If Not IsPostBack Then 
Loadclass () “加 载 新 闻 分 类 树 形 菜单 
"获取 数据 库 连 接 字 符 串 
strCconn 
=System.Configuration.Configurationsettings.AppSettings ("MM CONNECTION S 
TRING Cnn") 
Cnn = New OleDbConnection(strConn) 
cnn.open () ' 打 开 数 据 库 连 接 
' 将 指定 新 闻 的 clickNum 加 1 
Sql = "update ArtInfo Set clicknum=clicknum+l where id=" & trim(request. 
Querystring ("id")) 
Cmd = New OleDbCommand (sql, Cnn) 
Cmd .ExecuteNonquery 
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cnn.Close () “关闭 数据 库 连 接 
End If 
End Sub 


至 此 ， 新 闻 阅 读 页 面 的 功能 全 部 设计 完成 ， 页 面 预览 效果 如 图 11.49 所 示 。 
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人 上 一 条 加 有 从 检 用 于 呆 本 ts 加 

下 一 种 : 中 方 开发 于 胰 尾 正 当 活 到 日 攻关 订 无 必要 
TD 
了 
[Bb i 


图 11.49 页 面 预览 效果 


11.5 新 闻 管 理 


新 闻 管理 是 新 闻 发 布 系统 后 台 模块 的 一 个 功能 ， 仅 管理 员 可 以 执行 其 操作 。 正 常情 况 
下 ， 管 理 员 登录 后 方 可 执行 后 台 操作 。 这 里 为 了 用 更 多 篇 幅 介绍 这 一 功能 ， 就 跳 过 了 管理 
员 的 登录 页 面 的 介绍 。 当 用 户 单 击 系统 主页 面 中 的 【管理 】 链 接 时 ， 将 直接 进入 新 闻 管理 
的 后 台 操 作 页 面 。 


11.5.1 新闻 管 理 


(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 xwgl.aspx。 选 择 【 修 改 】|【 模 
板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【后 台 模 板 】， 将 模板 
应 用 到 本 页 面 。 

首先 ， 创 建 一 个 数据 集 ， 用 于 绑 定 动态 新 闻 信息 。 

(2) 在 【服务 器 行为 】 面板 中 单 击 曙 按钮 在 弹出 的 菜单 中 选择 【数据 集 】。 单 击 【 高 
级 】 按 钮 ， 切 换 至 【数据 集 】 对 话 框 的 高 级 模式 下 。 

(3) 设置 数据 集 的 名 称 为 DataSetl, 选择 连接 Cnn, 并 在 SQL 文本 框 中 输入 以 下 语句 : 

SELECT artinfo.id,arttitle,classname,author, copyfrom, addtime, clicknum, sh 


FROM artinfo,classinfo WHERE artinfo.classid=classinfo.classid ORDER BY 
addtime desc 


如 图 11.50 所 示 。 
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图 11.50 创建 数据 集 DataSet1 


单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 ， 该 数据 集 将 返回 所 有 的 新 闻 信 息 ， 
包括 已 经 审核 的 和 未 审核 的 (在 前 台 模 块 的 页 面 中 ， 均 只 显示 已 经 审核 的 新 闻 信 息 )。 

(4) 将 光标 置 于 表格 table2 的 第 3 个 单元 格 中 ,在 【服务 器 行为 】 面 板 中 单 击 因 按 钮 ， 
从 弹出 的 菜单 中 选择 【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 中 ， 设 置 ID 为 
DataGrid1， 数 据 集 选 择 DataSetl， 并 设置 为 一 次 显示 10 条 记录 ,在 【导航 】 下 拉 列 表 框 中 
选择 【编号 链接 到 每 一 页 】， 如 图 11.51 所 示 。 


图 11.51 创建 数据 网 格 DataGrid1 


(5) 通过 单 击 【 删 除 列 】 按 钮 三， 在 【 列 】 列 表 框 中 删除 不 需要 在 数据 网 格 中 显示 的 
列 ID 和 Author。 然后 , 分 别 设置 列 ArtTitle、ClassName、CopyFrom、 AddTime 和 ClickNum 
的 显示 标题 为 “新 闻 标 题 ”、“ 所 属 分 类 ”、“ 新 闻 来 源 ”、“ 发 布 时 间 ” 和 “点 击 数 ”。 

(6) 选择 列 sh， 单 击 【 更 改 列 类 型 】 按 钮 ， 从 弹出 的 菜单 中 选择 【自由 格式 】 命 令 。 
在 弹出 的 【自由 格式 列 】 对 话 框 中 ， 设 置 其 标题 为 “是 否 审核 ”。 单 击 【添加 数据 字段 】 
按钮 ， 在 弹出 的 【添加 数据 字段 】 对 话 框 中 选择 字段 SH， 如 图 11.52 所 示 。 
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图 11.52 【添加 数据 字段 】 对 话 框 
(7) 单 击 【确定 】 按 钮 ， 返 回 【 自 由 格式 列 】 对 话 框 ， 并 在 【内 容 】 文 本 框 中 将 所 添 
加 的 数据 字段 修改 为 “<%# IIK(DataSetl.FieldValue("sh", Container)=1)," 己 审 "," 未 审 ") %>”， 
如 图 11.53 所 示 。 


图 11.53 【自由 格式 列 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 自由 格式 列 的 设置 。 

(8) 单 击 【 添 加 列 】 按 钮 出 ， 从 弹出 的 菜单 中 选择 【超级 链接 】 命 令 。 在 弹出 的 【 超 
级 链接 列 】 对 话 框 中 设置 【标题 】 为 “编辑 ”，【 超 级 链接 文本 】 为 静态 文本 “编辑 ”， 
【链接 页 】 为 数据 字段 DD， 并 设置 【格式 字符 串 】 为 “Art_Edit.aspx?id={0}”， 如 图 11.54 
所 示 。 


11.54 【超级 链接 列 】 对 话 框 


单 击 【确定 】 按 钮 ， 完 成 超级 链接 列 的 添加 。 

(9) 单 击 【添加 列 】 按 钮 十 ， 从 弹出 的 菜单 中 选择 【删除 】 命 令 。 在 弹出 的 【删除 按 
钮 列 】 对 话 框 中 ， 设 置 【标题 】 为 “删除 ”，【 按 钮 类 型 】 为 【链接 按钮 】，【 删 除 自 】 
为 ArtInfo， 主 键 为 DD， 如 图 11.55 所 示 。 
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删除 掖 钮 列 FE 


11.55 【删除 按钮 列 】 对 话 框 


(10) 单 击 【 确 定 】 按 钮 ， 完 成 删除 按钮 列 的 添加 ， 也 完成 了 对 列 的 设置 。 此 时 ，【 数 
据 网 格 】 对 话 框 如 图 11.56 所 示 。 


数据 网 格 


x 
Tr rm 确定 | 
数据 集 : |Datasetl 5 取消 | 
Eig ho ”记录 帮助 wD | 
个 所 有 记录 
导航 : 所 S 广 接 到 每- 页 可 
列 : 团 加 局 回 


图 11.56 数据 网 格 DataGrid1 


单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 DataGridl 的 创建 。 

这 里 ， 没 有 采用 传统 的 编辑 方式 来 对 指定 的 新 闻 信 息 进 行 修改 。 因 为 ， 对 于 新 闻 内 容 
来 说 ， 不 可 能 显示 在 数据 网 格 中 。 如 果 采 用 传统 的 直接 编辑 方式 ， 就 无 法 对 新 闻 内 容 进行 
修改 。 因 此 ， 这 里 将 【编辑 】 按 钮 转变 为 一 个 超级 链接 ， 将 其 跳 转 至 新 闻 编 辑 页 面 
Art Editaspx 中 进行 操作 ， 同 时 将 当前 的 新 闻 ID 作为 页 面 参数 进行 传递 。 

此 外 ， 对 于 【是 否 审核 】 列 来 说 ， 其 在 数据 库 中 存储 的 数据 为 1( 表 示 已 审核 ) 和 0( 表 示 
未 审核 )。 如 果 直 接 将 这 些 数 据 显示 在 数据 网 格 中 ， 用 户 将 无 法 理解 。 因 此 ， 这 里 采用 【 自 
由 格式 列 】 对 话 框 自 定义 该 列 的 数据 显示 。 在 自 定义 的 内 容 中 ， 调 用 了 IIF 函数 来 对 字段 
sh 的 值 进行 判断 ， 如 果 其 值 为 1， 则 返回 “已 审 ”; 否则 ， 返 回 “ 未 审 ”。 

至 此 ， 新 闻 管 理 的 功能 页 面 设计 完成 ， 页 面 预 览 效果 如 图 11.57 所 示 。 

单 击 【 删 除 】 按 钮 ， 可 直接 删除 指定 的 新 闻 信 息 ; 单 击 【 编 辑 】 按 钮 ， 则 将 跳 转 至 新 
闻 编 辑 页 面 Art Editaspx 中 进行 编辑 操作 。 
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今天 日 明 : ?006 年 11 月 1 日 运 回 二 台 


所 晨 分 共 发 和 时 间 点 击 数 是 再 审 柜 鞠 各 革除 


同 官 理 水 委 称 格 提高 天 名 气 价格 与 国际 接 覆 。 购 经 科技 2006-11.9 23:59:10 0 未 审 


六 新 闻 发 布 丙 卫 说 二 和 起 男 反 村 超女 昔 4 动 总 2006-11.9 23:58:39 40 。 已 而 
忆 施 类 官 理 布什 富 市 拉 旭 斯 和 和 竺 介 了 是 条 让 2006-11-9 23:54:42 44 已 
已 派 如 委 类 国际 居 吉 全 于 用 于 中 西部 和 玫 北 地 区 。 社会 。 2006-11.922:22:12 20 。 已 
诉 察 宝 与 全 总理 全 法 桔 答 叶 多 项 侣 作文 件 ”社会 。 2006-11-9 18;12;22 25 。 已 
国际 虑 如 建设 中 国 格 环 保 各 局 升格 为 环境 部 社会 。 2006-11.8 14:14:41 16 。 已 而 
中 力 开发 海 属 正当 活动 日 力 关 急 天 必要 社会。 2006-11-813:21:42 14 。 已 南 
际 治 富 珍 当 轩 世界 卫生 粗 织 新 任 台 季 事 ”新闻 人 物 2006-11-8 11:54:12 12 。 已 让 
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图 11.57 页面 预览 效果 
11.5.2 ”发 布 新 闻 


发 布 新 闻 页 面 的 功能 主要 是 添加 一 条 新 的 新 闻 信 息 。 

(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Art_Add.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【后 台 模 板 】， 将 
模板 应 用 到 本 页 面 。 

(2) 在 表格 table2 的 第 3 个 单元 格 中 , 插入 一 个 5 行 6 列 的 表格 table3, 其 属性 设置 如 
11.58 所 示 。 


国王 各 FRR FA axoF | @ 
cas He 击 [ [可 ED En 
到 到 到 。 于 人 | 
到 列 到 WE 9 < 


图 11.58 表格 属性 设置 


(3) 在 表格 table3 的 各 个 单元 格 中 输入 相应 的 文本 ， 并 添加 用 于 信息 输入 的 各 个 Web 
服务 器 控件 ， 如 图 11.59 所 示 。 


上 
上 


lee LASP: TEXTBOX] 请 输入 新 闻 标 题 ! 


Ce] LASP: TEXTEOX] 刁 


图 11.59 表格 设计 
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其 中 ， 通 过 审核 对 应 的 下 拉 列 表 框 中 ， 添 加 了 两 个 数据 项 ， 其 显示 文本 分 别 为 “已 审 
核 ” 和 “未 审核 ”， 返 回 值 分 别 为 1 和 0， 其 定义 代码 如 图 11.60 所 示 。 


td width= "21%”aligr= “left“> 
《asp:DropDownList id= "sh”runat=“serVer > 

<asp:ListItem Yalue="1"》 已 审核 </ asp:ListItem> 

<asp:ListItem Yalue="0") 未 审核 </asp:ListItem> 


</asp:DropDownList> 
td> 


CC 


11.60 【通过 审核 】 下 拉 框 控件 


在 新 闻 标题 所 对 应 的 文本 框 之 后 ， 添 加 了 一 个 RequiredFieldValidator 服务 器 控件 ， 用 
于 对 新 闻 标题 的 输入 进行 验证 ， 其 属性 设置 如 图 11.61 所 示 。 


标签 篇 辑 嚣 - RequiredFieldYalidator 


图 11.61 Require1 验证 控件 
对 于 【新 闻 分 类 】 下 拉 列 表 框 控件 的 数据 绑 定 ,是 在 代码 中 通过 自 定义 过 程 LoadClass10) 


来 实现 的 。 该 过 程 代码 在 新 闻 搜 索 中 已 经 进行 了 描述 ， 这 里 不 再 袭 述 。 
(4) 打开 【服务 器 行为 】 面 板 ， 单 击 加 按钮 ， 在 弹出 的 菜单 中 选择 【插入 记录 )】 命令 。 


图 11.62 所 示 。 


此 时 ， 将 弹出 【插入 记录 】 对 话 框 ， 如 
连接 了 


11.62 【插入 记录 】 对 话 框 


(5) 数据 库 连接 选择 Cnn, 选择 表格 ArtInfo, 然后 , 分 别 设置 字段 ArtContent、 ArtTitle、 
Author、ClassID、CopyFrom、KeySt 和 SH 的 获取 值 为 表单 元 素 Content、Title、Author、 
.415 。 
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Xwfl、CopyFrom、KeyWord 和 SH 的 值 。 最后， 设置 当 数 据 提交 成 功 后 转向 的 页 面 为 


Art Add 
(06) 


.aspx， 即 仍 返 回 本 页 面 。 
单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 的 创建 。 


至 此 ， 发 布 新 闻 页 面 的 功能 设计 完成 ， 其 页 面 预览 效果 如 图 11.63 所 示 。 


11.6.1 


上 文 全 日。 鲍 本 日。 查看 册 。 收 藕 W)。 工具 (TD) 天 肋 由 IE 
]+FE -~ :加 日 舍 | 十 kg 天 冤 拓 人 王 
JET EE 


¥ 
` 动态 新 闻 发 布 系 统 
天 日 期 : 2006 年 1 月 1 日 近 同 前 台 


| F65e 


避 新 可 管理 WN 
加 新 闻 发 布 基 闻 内 容 : el 


六 分 类 官 理 


见 添 bn 分 类 


新 闻 作 者 新 闻 未 源 : 关 委 了 :| 国 
提交 


本 
BE 区 #8 7 


图 11.63 页面 预览 效果 
11.6 分 类 管理 


分 类 管理 


分 类 管理 主要 用 于 对 新 闻 的 分 类 信息 进行 管理 , 其 操作 包括 对 分 类 信息 的 编辑 和 删除 。 


(1) 新 建 一 个 ASPNET VB 类 型 的 页 面 ， 将 其 命名 为 Class Admin.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 选择 【后 台 模 板 】， 将 
模板 应 用 到 本 页 面 。 

为 了 提供 对 分 类 信息 的 浏览 ， 首 先 需 要 创建 一 个 数据 集 。 
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打开 【服务 器 行为 】 面 板 ， 单 击 世 按钮， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 


在 弹出 的 【数据 集 ] 对 话 框 中 设置 数据 集 名 称 为 DataSetl, 连接 选择 Cnn, 表格 选择 ClassInfo， 
排序 条 件 设置 为 按 字段 UpClass 升序 排序 ， 如 图 11.64 所 示 。 


单 下 
G3) 


【确定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 ， 该 数据 集 将 返回 所 有 新 闻 分 类 信息 。 
将 光标 置 于 表格 table2 的 第 3 个 单元 格 中 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 轩 | 按 


钮 ， 从 弹出 的 菜单 中 选择 【数据 网 格 】 命 令 。 在 弹出 的 【数据 网 格 】 对 话 框 中 设置 其 ID 为 
DataGrid1, 数据 集 为 DataSetl, 设置 一 次 显示 10 条 记录 , 在 【导航 】 下 拉 列 表 框 中 选择 【 编 
号 链接 到 每 一 页 】， 如 图 11.65 所 示 。 
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图 11.65 数据 网 格 DataGrid1 
(4) 单 击 【 添 加 列 】 按 钮 十 ， 从 弹出 的 菜单 中 选择 【' 编 辑 '、' 更 新 '、' 取 消 ' 按 钮 列 】 命 
令 ， 并 在 弹出 的 对 话 框 中 设置 【标题 】 为 “编辑 ”，【 按 钮 类 型 】 为 【链接 按钮 】，【 更 
新 表格 】 为 ClassInfo， 【主键 】 为 ClassID， 如 图 11.66 所 示 。 


和 党、 更 新 、 取 消 按 钮 列 


图 11.66 【编辑 、 更 新 、 取 消 按钮 列 】 对 话 框 
单 击 【确定 】 按 钮 ， 完 成 该 按钮 列 的 添加 。 
(5) 再 次 单 击 【 添 加 列 】 按 钮 出 ， 从 弹出 的 菜单 中 选择 【' 删 除 按 钮 】 命 令 ， 并 在 弹出 
的 对 话 框 中 设置 【标题 ] 为 “删除 ”,【 按 钮 类 型 为 【链接 按钮 】,【 更 新 表格 】 为 ClassInfo， 
【主键 】 为 ClassID， 如 图 11.67 所 示 。 
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11.67 【删除 按钮 列 】 对 话 框 
单 击 【 确 定 】 按 钮 ， 完 成 删除 按钮 列 的 添加 。 
(6) 依次 选择 列 ClassID、UpClass 和 ClassName, 分 别 设置 其 显示 标题 为 “分 类 编号 ”、 
“上 级 分 类 ”和 “分 类 名 称 ”。 其 中 ， 设 置 ClassName 列 时 ， 需 取消 其 只 读 属性 ， 并 设置 
提交 值 为 VarWChar， 如 图 11.68 所 示 。 


简单 数据 宇 段 列 x 


图 11.68 设置 ClassName 列 


(7) 通过 单 击 狂 和 和 区 按钮 ， 调 整 字段 列 的 顺序 (从 上 到 下 ) 为 “分 类 编号 ”、“ 分 类 名 
称 ”、“ 上 级 分 类 ”、“ 编 辑 ” 和 “删除 ”， 如 图 11.69 所 示 。 


简单 数据 字段 


上 纪 分 类 简单 数据 字段 
坊 缉 “ 妨 辑 '、' 更 新 、“ 取消 "按钮 
到 除 “ 册 除 ' 按钮 


图 11.69 数据 网 格 DataGrid1 


单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 的 创建 。 
由 于 在 删除 分 类 信息 时 ， 不 能 直接 删除 指定 的 分 类 ， 需 先 判 断 其 是 否 存在 与 该 分 类 相 


关 的 新 闻 信息 以 及 该 分 类 下 是 否 存在 子 分 类 信息 。 因 此 ， 这 里 不 能 采用 数据 网 格 中 默认 的 
删除 事件 ， 而 需 自 定义 删除 操作 。 
(8) 在 【设计 】 视 图 中 ， 选 择 数据 网 格 DataGridl 并 右 击 ， 从 弹出 的 快捷 菜单 中 选择 
【编辑 标签 】 命 令 ， 并 在 弹出 的 【标签 编辑 器 】 对 话 框 中 选择 【事件 】|OnItemCommand， 
将 其 默认 值 DataSetl.OnDataGridDelete 修改 为 DataGridl Del， 如 图 11.70 所 示 。 
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标签 编辑 串 - DataGrid 


第 规 DataGrid - DnTtenCommand 


日 事件 修改 为 : Data5ridl_Del 
OnTtenCreated 
OnTtenConmand Eb, 
OnInit 加 
OnEditConmand 
OnSortConmand 
OnPagsInaexChanged 
OnCsneelConmand 
OnpreRender 
OnDisposed 
OnDatabinding 
Onlnload 
OnDeleteConnand 
OnTtenDataBound 
OnLoad 
OnSelectedlndexCh 


?标签 信息 


mw | 
11.70 修改 OnltemCommnad 事件 


(9) 在 【布局 】 项 中 设置 数据 网 格 的 宽度 为 90%。 单 击 【 确 定 】 按 钮 ， 完 成 数据 网 格 
的 设置 。 


提示 : 这 里 修改 了 数据 网 格 默 认 的 OnItemCommand 事件 。 当 再 次 双击 该 数据 网 格 进行 修 
改 时 ， 其 OnItemCommand 事件 又 将 恢复 原来 的 默认 值 DataSetl.OnDataGridDelete。 
这 是 读者 在 操作 时 需要 特别 注意 的 。 


(10) 切换 至 【代码 】 视 图 ， 添 加 自 定义 的 DataGridl Del 事件 ， 其 代码 如 下 : 


【示例 代码 】 
Sub DataGridl Del (ByVal Sender As Object，ByVal E As 
DataGridCommandEventArgs) 
"获取 当前 所 要 删除 的 新 闻 分 类 ID 
Dim codestr As String = E.Item.Cells(0).Text 
Dim DataR As OleDbDataReader 
Dim Cnn As OleDbConnection 
Dim Cmd As OleDbCommand 
Dim StrCnn As String 
Dim Sql As String 
IE CType(e.CommandSource, LinkButton) .CommandName = "Delete" Then 
' 获 取 数 据 库 连 接 字 符 串 
StrCnn = System.Configuration.Configurationsettings.AppSettings 
("MM CONNECTION STRING Cnn") 
Cnn = New OleDbConnection (StrCnn) 
Cnn.Open () ' 打 开 数 据 库 连 接 
' 查 询 是 否 存 在 与 所 要 删除 的 分 类 相关 联 的 新 闻 信息 
Sql = "select * from Artinfo where classid=" & Trim(codestr) 
Cmd = New OleDbCommand (sql, Cnn) 
DataR = Cmd.ExecuteReader () 
If DataR.Read() Then 
' 存 在 与 该 分 类 相关 的 新 闻 信息 ， 提 示 无 法 删除 
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Clientscript.Registerstartupscript (Me .GetType () ，""，GetInfo(" 存 在 与 
该 分 类 相关 的 新 闻 信息 ， 无 法 删除 ! ") ) 
Cnn.cClose() 
Exit Sub 
End if 
DataR.Close() ' 关 闭 DataReader 对 象 
' 查 询 所 要 删除 的 新 闻 分 类 是 否 存在 子 分 类 信息 
Sql = "select * from classinfo where upclass=" & Trim(codestr) 
Cmd = New OleDbCommand (Sql, Cnn) 
DataR = Cmd.ExecuteReader () 
If DataR.Read() Then 
' 该 分 类 存在 子 分 类 信息 ， 提 示 无 法 删除 
Clientscript.Registerstartupscript (Me.GetType (), "",， GetInfo(" 该 分 类 
存在 下 级 分 类 信息 ， 无 法 删除 ! ") ) 
Cnn.Close() 
Exit Sub 
End if 
DataR.Close() ' 关 闭 DataReader 对 象 
"符合 删除 条 件 ， 执 行 删除 操作 
Sql = "delete from classinfo where classid=" & codestr 
Cmd = New OleDbCommand (Sql, Cnn) 
Cmd .ExecuteNonQuery () 
Cnn.Close() “关闭 数据 库 连 接 
"将 页 面 跳 转 至 本 页 面 ， 刷 新 数据 的 显示 
Response.Redirect ("Class Admin.aspx") 
End If 
End Sub 


至 此 ， 分 类 管理 的 页 面 功能 设计 完成 ， 页 面 预览 效果 如 图 11.71 所 示 。 
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11.71 页 面 预览 效果 


也 许 读者 会 问 ， 为 什么 数据 网 格 中 的 上 级 分 类 列 只 能 显示 分 类 ID， 而 不 能 显示 分 类 名 
称 ? 因为 这 会 让 用 户 感觉 很 别扭 。 确 实 ， 在 正常 情况 下 ， 上 级 分 类 应 该 显示 分 类 名 称 的 。 
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但 Dreamweaver 8 中 的 数据 库 行为 对 复杂 的 SQL 语句 缺乏 强 有 力 的 支持 。 事 实 上 ， 在 数据 
集 DataSetl 中 的 SQL 语句 添加 一 个 Select 子 查询 即 可 返回 上 级 分 类 对 应 的 分 类 名 称 , 而 非 
分 类 了 D. 但 在 Dreamweaver 8 的 数据 网 格 的 可 视 化 操作 中 , 是 不 支持 这 条 包含 子 查询 的 SQL 
语句 。 当 使 用 该 语句 作为 数据 集 DataSetl 的 SQL 语句 时 ， 在 创建 数据 网 格 并 选择 数据 引 
DataSetl 时 将 会 提示 错误 ， 如 图 11.72 所 示 。 


数 括 网 格 


bi 


a 
a 
rrr | | 
未: 6 而 一 订 | 
个 所 有 记录 
导航 : | 链接 到 前 面 和 后 面 的 页 了 
列 : 加 已 


图 11.72 错误 提示 
这 是 非常 遗憾 的 。 但 是 ， 这 个 问题 是 可 以 巧妙 解决 的 。 既 然 在 创建 数据 网 格 时 ， 无 法 
识别 带 有 复杂 SQL 语句 的 数据 集 字段 ， 那 么 ， 可 以 在 创建 数据 网 格 之 后 来 重新 定义 数据 集 
的 SQL 语句 。 前 面 用 户 已 经 实现 了 数据 网 格 的 创建 和 数据 绑 定 ， 此 时 在 【服务 器 行为 】 面 
板 中 双击 数据 集 DataSetl ， 在 弹出 的 【数据 集 】 对 话 框 中 将 其 SQL 语句 修改 为 以 下 语句 : 


SELECT classid, (select classname from classinfo where classid=a.upclass) as 
upclass,classname FROM ClassInfo a ORDER BY UpClass ASC 


此 时 , 页面 预览 中 将 显示 上 级 分 类 所 对 应 的 分 类 名 称 ， 而 非 分 类 ID， 如 图 11.73 所 示 。 
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图 11.73 页 面 预览 
虽然 这 样 已 经 解决 了 问题 ， 但 是 需要 注意 的 是 ， 用 户 将 无 法 再 次 通过 双击 【服务 器 行 
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为 面板 中 的 数据 网 格 来 对 其 进行 编辑 , 因为 在 可 视 化 操作 中 它 依然 无 法 支持 带 有 复杂 SQL 
语句 的 数据 集 。 


11.6.2 ”添加 分 类 


(1) 新 建 一 个 ASP.NET VB 类 型 的 页 面 ， 将 其 命名 为 Class_Add.aspx。 选 择 【 修 改 】| 
【模板 】|【 套 用 模板 到 页 】 命 令 ， 在 弹出 的 【选择 模板 】 对 话 框 中 ， 选 择 【 后 台 模 板 】， 
将 模板 应 用 到 本 页 面 。 

(2) 在 表格 table2 的 第 3 个 单元 格 中 , 插入 一 个 3 行 2 列 的 表格 table3, 其 属性 设置 如 
图 11.74 所 示 。 
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11.74 ”表格 属性 


(3) 在 表格 table3 的 各 个 单元 格 中 输入 相应 的 文本 ， 并 添加 用 于 信息 输入 的 各 个 Web 
服务 器 控件 ， 如 图 11.75 所 示 。 


分 类 名 称 : JTR5P7TERTBO8] : 


上 级 分 类 : je 


图 11.75 表格 设计 
(4) 在 【提交 】 按 钮 之 后 ， 添 加 了 一 个 RequiredFieldValidator 服务 器 控件 ， 用 于 对 分 
类 名 称 的 输入 进行 验证 ， 其 属性 设置 如 图 11.76 所 示 。 


标签 篇 辑 回 - RequiredFieldyalidator 


RequiredFieldyalidator - 常规 


Cw ]_ ww | 


11.76 ”Require1 验证 控件 
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(5) 对 于 上 级 分 类 对 应 的 下 拉 列 表 框 控件 的 数据 绑 定 ， 是 在 代码 中 通过 自 定义 过 程 
LoadClass1() 来 实现 的 。 该 过 程 代码 在 新 闻 搜 索 中 已 经 进行 了 描述 ， 这 里 不 再 歼 述 。 但 需要 
注意 的 是 ， 如 果 用 户 所 添加 的 分 类 并 非 其 分 类 的 子 分 类 时 ， 此 时 是 无 须 选择 上 级 分 类 的 。 
签 于 这 种 考虑 ， 需 要 在 上 级 分 类 中 添加 一 项 “< 无 >”， 以 便 用 户 在 添加 根 分 类 信息 时 进行 
选择 。 为 此 ， 需 要 修改 页 面 的 Page_ Load 事件， 修改 后 的 代码 如 下 : 

【示例 代码 】 

Sub Page _ Load(Sender Rs Object,E As EventArgs) 

If Not IsPostBack Then 
"定义 ListItem 变量 
Dim theItem As New ListItem() 
theItem.Text = "< 无 >"” ' 设 置 数据 项 的 显示 文本 
theItem.Value = 0 ' 设 置 数 据 项 的 返回 值 
xwf1.Items .Rdd (theItem) “将 以 上 定义 的 数据 项 添加 至 上 级 分 类 下 拉 列 表 框 中 
' 加 载 已 有 的 新 闻 分 类 信息 
LoadClass1 (0,0) 

End If 

End Sub 


在 Page Load 事件 中 ， 将 首先 添加 一 项 “< 无 >” 至 上 级 分 类 下 拉 列 表 框 中 ， 然 后 再 通 
过 自 定 义 过 程 LoadClass() 来 加 载 己 有 的 新 闻 分 类 信息 。 


(6) 打开 【服务 器 行为 】 面 板 ， 单 击 到 按钮 ， 在 弹出 的 菜单 中 选择 【插入 记录 】。 此 
时 ， 将 弹出 【插入 记录 】 对 话 框 ， 如 图 11.77 所 示 。 


提交 入， 自 |for» [0] 


图 11.77 【插入 记录 】 对 话 框 


数据 库 连接 选择 Cnn,， 选择 表格 ClassInfo。 然 后 , 分 别 设置 字段 ClassName 和 UpClass 
的 获取 值 为 表单 元 素 ClassName 和 xwfl 的 值 。 最 后 ,设置 当 数 据 提交 成 功 后 所 转向 的 页 面 
为 Class_Add.aspx， 即 仍 返 回 本 页 面 。 

(7) 单 击 【 确 定 】 按 钮 ， 完 成 插入 记录 的 创建 。 

至 此 ， 添 加 分 类 页 面 的 功能 已 实现 ， 其 页 面 预览 如 图 11.78 所 示 。 
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11.78 页 面 预览 


11.7 新 闻 页 面 编辑 


在 新 闻 管 理 中 ， 曾 经 提 到 ， 对 新 闻 信息 的 编辑 操作 是 将 页 面 跳 转 至 新 闻 编 辑 页 面 
Art_Edit.aspx 来 执行 的 。 本 节 将 讲解 新 闻 编辑 页 面 Art_Edit.aspx 的 具体 实现 。 

新 闻 编辑 页 面 与 新 闻 发 布 页面 的 布局 较为 相似 ， 因 此 可 先 通过 复制 新 闻 发 布 页 面 来 建 
立新 闻 编辑 页 面 ， 然 后 在 原 有 基础 上 进行 修改 。 

(1) 打开 新 闻 发 布 页 面 Art Add.aspx， 选 择 【 文 件 】| 【另存 为 】 命 令 ， 在 弹出 的 【 另 
存 为 】 对 话 框 中 输入 文件 名 Art_Edit.aspx， 并 单 击 【 保 存 】 按 钮 ， 完 成 男 存 为 操作 。 

(2) 在 新 闻 编 辑 页 面 中 ,首先 将 页 面 标题 设置 为 “新 闻 编辑 ”, 然后 删除 页 面 中 的 【 插 
入 记录 】 服 务 器 行为 。 

(3) 在 对 指定 的 新 闻 进 行 编辑 之 前 ， 首 先 必 须 获取 指定 新 闻 的 相关 信息 ， 并 将 其 显示 
在 页 面 的 各 个 输入 控件 中 ， 以 便 用 户 进行 修改 。 为 此 ， 需 要 创建 一 个 数据 集 。 

(4) 打开 【服务 器 行为 】 面 板 ， 单 击 到 按钮， 从 弹出 的 菜单 中 选择 【数据 集 】 命 令 。 
在 弹出 的 【数据 集 】 对 话 框 中 设置 数据 集 名 称 为 DataSet1， 选 择 连接 Cnn， 表 格 设置 为 
ArtInfo， 第 选 条 件 为 字段 ID 等 于 URL 参数 ID， 如 图 11.79 所 示 。 

(5) 单 击 【 确 定 】 按 钮 ， 完 成 数据 集 DataSetl 的 创建 ， 该 数据 集 将 返回 指定 所 要 编辑 
的 新 闻 的 相关 信息 。 

(6) 在 【设计 】 视 图 中 ， 选 择 新 闻 标题 对 应 的 文本 框 控 件 并 右 击 ， 从 弹出 的 快捷 菜单 
中 选择 【编辑 标签 】 命 令 ， 并 在 弹出 的 【标签 编辑 器 】 对 话 框 中 设置 其 文本 为 “<%# 
DataSetl.FieldValue("ArtTitle", Container) %>”， 如 图 11.80 所 示 。 

(7) 重复 以 上 操作 ， 分 别 设置 “新 闻 内 容 ”、“ 新 闻 作者 ”、“ 新 闻 来 源 ” 和 “关键 
字 ” 所 对 应 的 文本 输入 框 的 值 , 其 对 应 的 动态 文本 分 别 为 字段 ArtContent、 Author、CopyFrom 
和 Keys。 
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图 11.80 【标签 编辑 器 】 对 话 框 
(8) 为 了 在 更 新 记录 时 获取 当前 进行 编辑 操作 的 新 闻 ID， 在 【提交 】 按 钮 之 后 插入 一 


个 隐藏 域 ， 其 名 称 设置 为 ArtID， 其 值 设置 为 “<%# Request.QueryString("id")%>”， 如 
11.81 所 示 。 


11.81 插入 隐藏 域 
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(9) 在 页 面 中 ， 新 闻 分 类 和 通过 审核 所 对 应 的 均 为 下 拉 列 表 框 控件 。 在 加 载 其 数据 的 
同时 ， 还 需要 在 其 数据 中 寻找 当前 编辑 的 新 闻 信 息 所 对 应 的 新 闻 分 类 和 审核 标志 ， 并 将 其 
置 为 下 拉 列 表 框 控件 的 当前 选中 项 。 此 操作 只 能 通过 代码 来 实现 ， 为 此 需要 修改 页 面 的 
Page_Load 事件 ， 修 改 后 的 代码 如 下 : 

【示例 代码 】 


Sub Page Load(Sender Rs Object,E As EventArgs) 
Dim theClass as Integer 
Dim theSH as Integer 
If Not IsPostBack Then 
"加 载 新 闻 分 类 信息 
LoadCclassl(0,0) 
"判断 数据 集 Dataset1 的 记录 数 是 否 大 于 0， 即 当前 所 要 编辑 的 新 闻 是 否 存在 
If DataSet1.DefaultView.Table.Rows .Count>0 Then 
"获取 当前 所 要 编辑 的 新 闻 的 分 类 ID 
theClass=DataSet1.DefaultView.Table.Rows (0) ("classid") 
' 获 取 当 前 所 要 编辑 的 新 闻 的 审核 标志 
theSH=DataSet1.DefaultView.Table.Rows (0) ("sh") 
if not (xwfl.Items.FindByValue (theClass) Is Nothing) then 
"在 xwfl 下 拉 框 控件 中 找到 与 theclass 匹配 的 数据 项 ， 并 设置 其 Selected 属性 为 
True 
xwfl.Items.FindByValue (theClass) .Selected = True 
end if 
if not (sh.Items.FindByValue (theSH) Is Nothing) then 
' 在 SH 下 拉 框 控件 中 找到 与 thesH 匹配 的 数据 项 ， 并 设置 其 Selected 属性 为 True 
sh.Items.FindByValue (theSH) .Selected = True 
end if 
End If 
End If 
End Sub 


在 绑 定 新 闻 信息 的 数据 显示 之 后 ， 接 下 来 实现 数据 的 更 新 。 

(10) 在 【应 用 程序 服务 器 行为 】 面 板 中 ， 单 击 加 按钮 ， 从 弹出 的 菜单 中 选择 【更 新 记 
录 】 命 令 。 在 弹出 的 【更 新 记录 】 对 话 框 中 ， 设 置 连接 为 Can， 更 新 表格 为 ArtInfo。 分 别 
设置 字段 ArtContent、ArtTitle、Author、ClassID、CopyFrom、Keys 和 SH 的 获取 值 为 表单 
元 素 Content、Title、Author、xwfl、CopyFrom 和 KeyWord 的 值 ， 而 作为 主键 的 字段 ID， 
则 设置 其 获取 值 为 隐藏 域 ArtID 的 值 。 最 后 ， 设 置 数据 提交 成 功 后 转 到 的 页 面 为 新 闻 管 理 
页 面 xwgl.aspx， 如 图 11.82 所 示 。 

单 击 【确定 】 按 钮 ， 完 成 更 新 记录 的 创建 。 

新 闻 编辑 页 面 的 功能 已 基本 完成 ,但 还 需 考虑 当 用 户 所 选择 的 新 闻 ID 不 存在 的 情况 ( 比 
如 说 ， 用 户 没有 选择 所 要 编辑 的 新 闻 ， 而 是 直接 输入 地 址 进入 本 页 面 )。 

(11) 在 控制 新 闻 信 息 显示 的 表格 table3 之 后 输入 文本 “请 选择 所 要 编辑 的 新 闻 ! ”， 
并 设置 其 字体 颜色 为 红色 。 然 后 ， 选 择 该 文本 ， 在 【服务 器 行为 】 面 板 中 ， 单 击 剧 按钮 ， 
从 弹出 的 菜单 中 选择 【显示 区 域 】| 【数据 集 为 空 时 显示 】 命 令 ， 并 在 弹出 的 对 话 框 中 设置 
数据 集 为 DataSet1， 如 图 11.83 所 示 。 
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[iaarom， 没 有 兢 取 值 。 到 
入 于 可 
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加 果 成 功 ， 则 转 到 ; Fv spx 
加 果 失 网， 则 转 到 : 政 一 一 
”失败 时 显示 调试 信息 
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11.82 【更 新 记录 】 对 话 框 
ETE > 
a | 
| 


图 11.83 【数据 集 为 空 时 显示 】 对 话 框 


单 击 【 确 定 】 按 钮 ， 完 成 显示 区 域 的 创建 。 
至 此 ， 新 闻 编 辑 页 面 制作 完成 ， 其 页 面 预览 如 图 11.84 所 示 。 


人 天 日 其: 2006 年 11 月 M1 日 


胃 过 富 刁 : [ 末 二 会 司 


A DL 
避 ”新闻 发 广 其 交办 容 ; El 国家 雁 改 委 下 谋 研 究 天 率 气 中] 
利用 政策 ， 育 天 关 拉 价格 。 他 同 对 太 示 ， 日 前 天 
所 完 总 全 和 人才 检 全 人 


以 人 于 六 基于 今生 天 党 气 利用 方向 笠 
为 主 ， 其 中 城市 烦 气 将 是 


ss 区 放下， 呈 划 和 了 生生 代 和 和 有 半生 局 


新 闻 作 考 : 莉 艺 新 员 示 十 : 让 国 坚 末 关键 宁 : 天 拓 气 
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11.84 页面 预览 
11.8 习 题 


(1) 扩展 新 闻 的 搜索 功能 ， 添 加 发 布 时 间 和 新 闻 来 源 两 个 搜索 条 件 。 
(2) 添加 后 台 模 块 的 管理 员 登 录 页 面 ， 并 将 前 台 页 面 的 【管理 〗 链 接 指向 该 页 面 。 
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